![](https://img-blog.csdnimg.cn/20201014180756918.png?x-oss-process=image/resize,m_fixed,h_64,w_64)
数据库应用基础VFP9.0
zjhzcjg
大学教师
展开
-
[VFP]实验报告 ------实验六 循环嵌套结构程序设计
实验报告 ------实验六 循环嵌套结构程序设计一、实验过程报告:1、 写出第2题的程序代码。set talk offclearstore 1 to t,s,ndo while st=t*(n+1)*(n+2)s=s+tn=n+2enddo? "s=",s-t? "n=",n-2set talk on2、 写出第3题的程序代码及程序运行结果中所求出的完数。set talk offclearfor i=1 to 300s=0for j=1 to i-1 if i%j=0 s=s+原创 2010-06-06 10:47:00 · 2713 阅读 · 0 评论 -
[VFP]实验报告 实验四 顺序及分支程序设计
实验报告 实验四顺序及分支程序设计一、 实验过程报告:1、 写出第1题的程序代码及 X=1、Y=1、Z=1 时的程序运行结果。set talk offclearinput "x=" to xinput "y=" to yinput "z=" to z? (abs(x-y)+sqrt(abs(x*y*z))+y/z)*exp(abs(x+y))+log(abs(y*z))*sin(3.14/6)set talk onX=1、Y=1、Z=1 时的程序运行结果:14.7781122、 写原创 2010-06-06 10:45:00 · 2327 阅读 · 0 评论 -
[VFP]实验报告 ------实验五 循环结构的程序设计
实验报告 ------实验五 循环结构的程序设计一、实验过程报告:1、写出第1题的程序代码及 x=2、n=2 时程序运行的结果。代码1:set talk offclearinput "n=" to ninput "x=" to xs=0for i=1 to n s=s+x**iendfor? sset talk on代码2:set talk offclear input "n=" to ninput "x=" to xs=0i=1do while i s=s+x**i i=i+1end原创 2010-06-06 10:46:00 · 4960 阅读 · 0 评论 -
源码搜搜
<br />http://www.codesoso.com原创 2011-02-11 16:13:00 · 1269 阅读 · 1 评论 -
水仙花数
for a=1 to 9 for b=0 to 9 for c=0 to 9 if(100*a+10*b+c=a*a*a+b*b*b+c*c*c) ? 100*a+10*b+c endif endfor endforendfor原创 2011-05-21 08:56:00 · 327 阅读 · 0 评论