主题:有关 数组 的问题!
xh2693942
[专家分:0] 发布于 2005-05-01 17:22:00
输入4名学生的数学,物理,化学,PASCAL 5门课程的成绩,求每名学生的平均分,打印成绩表。(PASCAL编)
各位!帮忙!啊!
回复列表 (共7个回复)
沙发
飞上太空 [专家分:0] 发布于 2005-05-01 17:39:00
我正在学,好好学,你可以的!!
板凳
lyn532226 [专家分:230] 发布于 2005-05-01 18:01:00
[em9]这个呀,你先说说要不要注意输出的格式问题,其实问题并不复杂,好好想下相信你会行的。
3 楼
xh2693942 [专家分:0] 发布于 2005-05-01 18:48:00
不要注意输出的格式问题
4 楼
xh2693942 [专家分:0] 发布于 2005-05-01 18:48:00
能帮上忙吗??
5 楼
大蟹 [专家分:50] 发布于 2005-05-02 09:08:00
可以用记录类型,方便记录所有数据
6 楼
水生 [专家分:550] 发布于 2005-05-02 12:50:00
var
a:array[1..4,1..6] of integer;
i,j,avr:integer;
begin
writeln('input 4 students' scores:');
for i:=1 to 4 do
for j:=1 to 5 do
read(a[i,j]);
readln;
for i:=1 to 4 do
begin
avr:=0;
for j:=1 to 5 do
avr:=avr+a[i,j];
avr:=avr div 5;
a[i,6]:=avr;
end;
for i:=1 to 4 do
begin
for j:=1 to 6 do
write(a[i,j]:4);
writeln;
end;
end.
7 楼
lyn532226 [专家分:230] 发布于 2005-05-03 18:18:00
哪里有5门科目啊??!!
我来回复