Споследним по информатике, ! ( найти наибольший элемент главной диагонали двумерного массива из 30 элементов. паскаль

172

342

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

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

ladakorobova

Информатика

4,4(75 оценок)

Для матрицы 6х6 (36 элементов): const n=6; var a: array[1..n,1..n] of integer; i,j,max: integer; begin randomize; writeln('исходный массив: '); for i: =1 to n do begin for j: =1 to n do begin a[i,j]: =random(51); write(a[i,j]: 3); end; writeln; end; max: =a[1,1]; for i: =2 to n do if a[i,i]> max then max: =a[i,i]; writeln('max = ',max); end. пример: исходный массив: 32 14 6 10 45 8 39 31 5 28 18 15 3 19 19 18 35 0 42 27 36 28 8 10 5 13 40 10 41 10 35 12 18 17 31 4 max = 41