趣味Visual-FoxPro--程序设计集锦(共62页).doc

精选优质文档-倾情为你奉上趣味Visual FoxPro 程序设计集锦5舍罕王的失算set talk offinput请输入n:to nt=1s=1for i=2 to nt=t*2s=s+tendforv=s/1.42e8h=(9/3.14159*v)(1/3)?总麦粒数约为:+str(s,10,3)+粒.?折合体积约为:+ltrim(str(v,15)+立方米?堆成正圆锥高约为:+str(h,5)+米return程序运行结果与说明请输入n:64总麦粒数约为:1.845e+019折合体积约为6立方米堆成正圆维高约为7193米5-1失算的另一名题：买马灯input请输入n: to nt=1s=1for i=2 to nt=t*2s=s+tendfor?共需花费+ltrim(str(s,16)+个包卢