function sintable(lim, mode) if mode == 1 format hex else format long end for i = 120:lim disp(sin(i*pi/180)) end format long endfunction