不是VIP会员,不能显示答案

题目解答

题目:
program test3;
const
n1=4;n2=5;
var
max,s,i,j,k,t:integer;
a;array[1..n1,1..n2] of integer;
begin
for i:=1 to n1 do
begin
for j:=1 to n2 do read(a[i,j]);
readln;
end;
s:=0;
for j:=1 to n2 do
begin
max:=0;
for i:=1 to n1 do
if max<a[i,j] then max:=a[i,j];
s:=s+max;
end;
writeln(s);
end.
输入:
1 2 3 4 5
6 9 13 5 7
11 12 8 15 14
21 20 18 16 17
输出:92
考点:
分析:
解答:
评论:
老师: