#scp
#二分法求平方根的近似值
定义:函数,平方根,number
定义:浮点数,ACCURACY,0.001
定义:浮点数,start,0
定义:浮点数,end,0
定义:浮点数,mid,0
定义:浮点数,tmp,0
定义:浮点数,result,0
end=number
当:1
mid=(start+end)/2.0
tmp=mid*mid
result=tmp-number
如果:(result<0),result=result*(-1)
如果:(result<=ACCURACY),返回:mid
如果:(tmp>number),end=mid
否则:start=mid
#显示:mid
#显示:start
#显示:end
结束#显示:tmp
返回:-1
结束
定义:函数,主函数
定义:字符串,string1
定义:浮点数,ret,0
ret=平方根(100)
显示:ret
等待:用户输入,string1
结束