Надо составить массив 2 х2, что бы самому надо было вводить в него числа. Потом он должен считать первую и вторую строки массива (отдельно) и определить какая из строк больше.

Question

Информатика

Гурьян

23 октября, 17:54

Надо составить массив 2 х2, что бы самому надо было вводить в него числа. Потом он должен считать первую и вторую строки массива (отдельно) и определить какая из строк больше.

+4

Ответы (1)

Знаете ответ на вопрос?

Доня · Answer 1

Const

n=2;

var

a:array[1 ... n, 1 ... n]of integer;

i, j, s, max, imax:integer;

begin

for i:=1 to n do

begin

s:=0;

for j:=1 to n do

begin

readln (a[i, j]) ;

s:=s+a[i, j];

end;

if s>max then

begin

max:=s;

imax:=i;

end;

end;

writeln ('i: ', imax,' s = ', max) ;

end.