pascal菜鸟——记录问题

显示全部楼层 · 2008-11-20 20:58:18

一个班级进行了一次数学测验，以每个学生的学号、姓名、考试成绩作为输入数据，使用记录编写程序：
（1）计算并输出班上平均成绩；
（2)根据每个学生的成绩评价等级：A（90-100）
B（80-89）C（70-79）D（60-69）E（60以下）
（3）打印输出每个学生的学号、姓名、成绩、等级
（4）统计并输出每一个等级的学生人数

千问 · 2008-11-20 20:58:18

program blabla;var student:array[1..50]of record
number,score:integer;
name:string;
grade:'A'..'E';
end;
n,i,a,b,c,d,e:integer;procedure input;beginfor i:=1 to n do
read(student.number,stud...