Заполнить матрицу из 8 строк и 5 столбцов случайными числами в интервале [10; 10] и вывести ее на экран. удвоить все элементы матрицы и вывести ее на экран. найти минимальные и максимальные элементы в матрице, указать номера. просто матрица и удвоенная есть. теперь нужно найти мин. и макс. значения program ff; uses crt; const n=8; m= 5; var a: array [1..n, 1..m] of integer; i,j: integer; begin writeln ('матрица: '); for i: =1 to 8 do begin for j: =1 to 5 do begin a[i,j]: =-10+random(21); write(a[i,j]: 4); end; writeln; end; for i: =1 to 8 do for j: =1 to 5 do a[i,j]: =a[i,j]*2; writeln ('удвоенная матрица: '); for i: =1 to 8 do begin for j: =1 to 5 dowrite(a[i,j]: 4); writeln; end; end.

Arkanius    2   11.06.2019 20:40    6