Question

vfp如何计算学生的平均分,高分率

甲.60分,乙70分,丙,80分,丁,100分,戊90分，己85分，庚50分，前三名的平均分为高分线，命令怎么写。
谢谢tgw5667,对我很有帮助,如果甲,语文60分,数学70分;乙,语文80分,数学100分;丙语文90分,数学85分;丁,语文70分,数学80分,前三名的平均分为高分线，求语文,数学的高分率,命令怎么写。然后如何形成报表对算出的结果打印,答出来我可要倾我所有积分,给你了,谢谢.

Answer 1

Use <分数表>
sort to temp on 分数 /D && 按分数由高到低排序，输出到表 temp 中
Use temp
sum 分数 to x Next 3 && 将前三名成绩之和送到变量x中
a=x/3 && 前三名的平均分
? a
--------------------------
高分率的意思不明白！
==============================
set talk off
Clear

SELECT TOP 3 成绩.姓名, (成绩.语文 + 成绩.数学)/2 As 平均分 ;
FROM 成绩;
ORDER BY 2 DESC;
INTO CURSOR 高分

Select 高分
Sum 平均分 to x
Gfx = x/3 && 高分线

Select 成绩
Count to y
Count to y1 for 语文>=Gfx
Count to y2 for 数学>=Gfx

? "高分线 = "+Str(Gfx,6,2)
? "语文高分率 = "+Str(y1/y*100,6,2)+"％"
? "数学高分率 = "+Str(y2/y*100,6,2)+"％"

Close Data
Retu