Предмет: Информатика,
автор: 21fox
дана матрица 5 на 5,надо сделать такую программу которая с каждой строки
будет выводить максимальное число.
типо ложно так выглядеть
2 3 4 5 6
4 6 3 2 4
5 6 7 8 3
2 5 3 4 6
3 4 5 9 0
первая строка 6
второая 6
третья 8
четвертая 6
пятая 9
Ответы
Автор ответа:
0
Var a:array [1..5, 1..5] of integer; i,j,max:integer;
begin
max:=0;
for i:=1 to 5 do
for j:=1 to 5 do
readln(a[i,j]);
for i:=1 to 5 do begin
for j:=1 to 5 do
if a[i,j]>max then max:=a[i,j];
writeln(t,'= ',max); inc(t); max:=0; end;
readln;
end.
begin
max:=0;
for i:=1 to 5 do
for j:=1 to 5 do
readln(a[i,j]);
for i:=1 to 5 do begin
for j:=1 to 5 do
if a[i,j]>max then max:=a[i,j];
writeln(t,'= ',max); inc(t); max:=0; end;
readln;
end.
Похожие вопросы
Предмет: Математика,
автор: twiktwika
Предмет: Музыка,
автор: korlitta76
Предмет: Математика,
автор: makachzhannur
Предмет: Алгебра,
автор: Saveran
Предмет: Физика,
автор: NastyaBolgar