vf程序设计实例

2021-01-28 20:48

(一)输入n的值,求1+1/2!+1/3!+1/4!+ .+1/n! (阶乘

n!=1*2*3*4....*(n-1)*n )

CLEAR

SUM=0

MUL=1

INPUT "请输入n的值: " TO N

FOR i=1 TO N

FOR j=1 TO i

MUL=MUL*J

ENDFOR

SUM= SUM+1/MUL

ENDFOR

?'求得的总和为: ',SUM

(二)输入10 个数,将它们按照从大到小的顺序排列。

clear

dime a(10)

?'输入10个数: '

for i=1 to 10

input "请输入: " to a(i)

endfor

for i=1 to 9

for j=1 to i

if a(j)>a(i+1)

t=a(i+1)

a(i+1)=a(j)

a(j)=t

endif

endfor

endfor

list memo like a


vf程序设计实例.doc 将本文的Word文档下载到电脑 下载失败或者文档不完整,请联系客服人员解决!

下一篇:县卫生局2011年上半年工作总结

相关阅读
本类排行
× 注册会员免费下载(下载后可以自由复制和排版)

马上注册会员

注:下载文档有可能“只有目录或者内容不全”等情况,请下载之前注意辨别,如果您已付费且无法下载或内容有问题,请联系我们协助你处理。
微信: QQ: