VF程序设计

Question

VF程序设计:
1. 求5！+10！+15！+20！的值
2.从键盘上输入任意三个数，从小到大排序
3.给一个百分制的成绩，要求输出成绩的等级 优 良 中 及格 不及格
90分以上 优
80——89 良
70——79 中
60——69 及格
0——60 不及格

Answer 1

2、
clear
dime a(3)
for i=1 to 3
input "请输入一个数：" to a(i)
endfor
?"降序排列为："
for i=1 to 2
for j=i+1 to 3
if a(i)<a(j)
k=a(i)
a(i)=a(j)
a(j)=k
endif
endfor
??alltrim(str(a(i)))+" "
endfor
??alltrim(str(a(i)))

3、
clear
input "请输入分数：" to x
do case
case x>=90
?"优"
case x>=80
?"良"
case x>=70
?"中"
case x>=60
?"及格"
case x>=0
?"不及格"
endcase

Answer 2

1.
lns=1
lnx=0
for i=1 to 20
lns=lns*i
if i%5=0
lnx=lnx+lns
endif
endfor
?lnx

2.
dime lna(3)
input '1.' to lna(1)
input '2.' to lna(2)
input '3.' to lna(3)
asort(lna)
?lna(1),lna(2),lna(3)

3.
input '给出分数：' to lnfs
do case
case lnfs>=90
?'优'
case betw(lnfs,80,89)
?'良'
case betw(lnfs,70,79)
?'中'
case betw(lnfs,60,69)
?'及格'
otherwise
?'不及格'
endcase