Регистрация
burgerface
30.03.2022 07:25
Музыка
Есть ответ 👍

Решить задачу по гармонии

288
371
Посмотреть ответы 1

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

pomogiteplease1245
pomogiteplease1245
4,8(20 оценок)
// 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

Популярно: Музыка