Square root by hand: Difference between revisions

m
→‎{{header|REXX}}: adjusted program to show one exactly less decimal digit in the answer (result).
m (→‎{{header|REXX}}: increased the number of decimal digits for calculations.)
m (→‎{{header|REXX}}: adjusted program to show one exactly less decimal digit in the answer (result).)
Line 206:
L= length(?) /*L: used to place dec. point.*/
if L==0 then call charout , . /*handle dec. point for i < 1. */
do spit=1 for places+1
call charout , ?
if L>0 then do; call charout , .; L= 0; end /*process dec. point*/
Line 227:
8968725339654633180882964062061525835239505474575028775996172983557522033753185701135437460340849884
7160386899970699004815030544027790316454247823068492936918621580578463111596668713013015618568987237
2
23
</pre>
{{out|output|text=&nbsp; when using the inputs of: &nbsp; &nbsp; <tt> .9 &nbsp; 80 </tt>}}
<pre>
.9486832980505137995996680633298155601158665417975650480572514558377783315917714
.94868329805051379959966806332981556011586654179756504805725145583777833159177146
</pre>
{{out|output|text=&nbsp; when using the inputs of: &nbsp; &nbsp; <tt> 625 </tt>}}