10 print "number";
20 input x
30 g=x/2
40 if x>=16 THEN g=x/4
50 if x>=64 g=x/8
60 if x>=256 g=x/16
70 if x>=4096 g=x/64
80 if x>=16384 g=x/128
90 p=g
100 g=(g+x/g)/2
110 if g-p>1 goto 90
120 if p-g>1 goto 90
130 print "square root is ";g
140 end