Ответы на вопрос:
// pascalabc.net 3.1, сборка 1213 от 04.04.2016 begin var m,n: integer; write(' число строк и столбцов: '); read(m,n); var a: =matrixrandom(m,n,-99,99); var vrow: =arrfill(m,0); var vcol: =arrfill(n,0.0); for var i: =0 to m-1 do begin var max: =-100; for var j: =0 to n-1 do begin write(a[i,j]: 4); if a[i,j]> max then max: =a[i,j] end; writeln; vrow[i]: =max end; writeln('вектор из наибольших значений строк'); vrow.println; for var j: =0 to n-1 do begin var s: =a[0,j]; for var i: =1 to m-1 do s+=a[i,j]; vcol[j]: =s/m end; writeln('вектор из средних арифметических по столбцам'); vcol.println end. тестовое решение: число строк и столбцов: 5 8 -82 67 -78 27 69 -80 85 34 70 -82 -89 -30 -57 31 14 33 -4 -1 -93 -21 81 -66 48 31 58 18 -40 -63 -68 40 46 -44 85 46 31 -61 1 43 2 -94 вектор из наибольших значений строк 85 70 81 58 85 вектор из средних арифметических по столбцам 25.4 9.6 -53.8 -29.6 5.2 -6.4 39 -8
Популярно: Информатика
-
vigura216.09.2021 00:41
-
AngelGelay05.02.2022 03:39
-
Petrov777106.01.2023 16:22
-
kononova200717.08.2021 18:38
-
Sofia071514.11.2022 18:01
-
Snzjxj07.03.2021 16:02
-
aishaidrisova29.03.2020 20:41
-
arina123801.11.2020 18:32
-
саня3097009.11.2022 07:08
-
lizabjnyjyve13.08.2021 10:39