杭州交通信息网移动营业员招聘要求:请教高手,小弟不是太会!PASCAL
来源：百度文库 编辑：杭州交通信息网 时间：2024/05/06 05:05:47
PASCAL中记录5个人的名字和3科成绩,按总分高到低进行排序,输出时输出名字和总分?
type stu=record
name:string;
f1,f2,f3,z:integer;
end;
var students:array[1..5]of stu;
i,a:integer;
Begin
a:=0;
for i:=1 to 5 do begin
with students[i] do begin
readln(name);
read(f1,f2,f3);
z:=f1+f2+f3;
end;
if students[i].z>a then a=i;
end;
with students[a] do begin
writeln(name):
writeln(z:0:2);
end;
end.
样例:
输入:
ChenCheng
13 14 15
LiLili
18 45 23
PengYaya
19 50 27
PwlEast
100 99.5 99.5
WuWuwu
10 8.75 90
输出:
PwlEast
299.00
先加总分,再排序,再输出
晕,想找人帮你代做题目?