Дан двумерный массив заданный случайным образом размером 3*5. вывести сформированный массив и найти максимальную сумму среди сумм столбцов

205

461

Посмотреть ответы 2

Ответы на вопрос:

никеда

Информатика

4,8(58 оценок)

Var a: array [1..5,1..3] of integer; b: array[1..5] of integer; x,y,i,n,max: integer; begin i: =1; randomize; for x: =1 to 5 do for y: =1 to 3 do a[x,y]: =random(10); for x: =1 to 5 do begin for y: =1 to 3 do write(a[x,y],' '); writeln; end; for y: =1 to 3 do begin for x: =1 to 5 do b[i]: =b[i]+a[x,y]; i: =i+1; end; for i: =1 to 3 do if b[i]> max then max: =b[i]; writeln(max); end.