UC知道求助!两道VFP的题
来源：百度知道 编辑：UC知道 时间：2024/05/26 15:48:37
1.
根据成绩.DBF，试编写程序统计显示表文件中所有学生的平均成绩和成绩档次，成绩档次评定标准为：成绩大于等于90分为“优”，80分至89分为“良”，70至79分为“中”，60至69分为“及格”，小于60分为“不及格”。显示格式如下：
学号 平均成绩 成绩档次
*************************************
990101 91.7 优
990103 84.9 良
990203 81.8 良
……
2.编程求S=(n!)/[m!(n!-m!)] 之值。（其中，n、m为从键盘输入的正整数且n>m，k!表示1×2×3×……×k，k为正整数）。
根据成绩.DBF，试编写程序统计显示表文件中所有学生的平均成绩和成绩档次，成绩档次评定标准为：成绩大于等于90分为“优”，80分至89分为“良”，70至79分为“中”，60至69分为“及格”，小于60分为“不及格”。显示格式如下：
学号 平均成绩 成绩档次
*************************************
990101 91.7 优
990103 84.9 良
990203 81.8 良
……
2.编程求S=(n!)/[m!(n!-m!)] 之值。（其中，n、m为从键盘输入的正整数且n>m，k!表示1×2×3×……×k，k为正整数）。
1. Repl all 成绩档次 with iif(平均成绩>=90,"优",iif(平均成绩>=80,"良",iif(平均成绩>=70,"中",iif(平均成绩>=60,"及格","不及格"))))
2.
N=INT(VAL(INPUTBOX("请输入N值的数")))
M=INT(VAL(INPUTBOX("请输入M值的数")))
=MESSAGEBOX(Fun_1(N)/(fun_1(M)*(fun_1(N)-fun_1(M))))
FUNCTION Fun_1(temp_1 as Double)
temp_2=0
temp_3=1
FOR temp_2 = 1 to temp_1
temp_3=temp_3 * temp_2
ENDFOR
RETURN temp_3
ENDFUNC