dodiv2.prg

用VFP计算平方根(例如sqtr(2))到6万5千位小数的程序.

* dodiv2
a=replicate("12345",10)
c=div2(a)
? c
return