Ответы на вопрос:
// pascalabc.net 3.0, сборка 1160 от 05.02.2016 procedure matrixprint(a: array[,] of integer); begin for var i: =0 to length(a,0)-1 do begin for var j: =0 to length(a,1)-1 do print(a[i,j]); println end end; function rowsum(a: array[,] of integer): array of integer; // суммы построчно begin setlength(result,length(a,0)); for var i: =0 to length(a,0)-1 do begin var s: =0; for var j: =0 to length(a,1)-1 do s+=a[i,j]; result[i]: =s end end; function colsum(a: array[,] of integer): array of integer; // суммы по столбцам begin setlength(result,length(a,1)); for var j: =0 to length(a,1)-1 do begin var s: =0; for var i: =0 to length(a,0)-1 do s+=a[i,j]; result[j]: =s end end; begin var n: =readinteger('n='); var m: =readinteger('m='); var x: =matrixrandom(n,m,1,5); writeln('исходный массив'); matrixprint(x); var srow: =rowsum(x); var ir: =0; for var i: =1 to srow.length-1 do if srow[i]> srow[ir] then ir: =i; writelnformat('максимум {0} в строке {1}',srow[ir],ir+1); var scol: =colsum(x); var ic: =0; for var i: =1 to scol.length-1 do if scol[i]< scol[ic] then ic: =i; writelnformat('минимум {0} в колонке {1}',scol[ic],ic+1) end. тестовое решение: n= 8 m= 5 исходный массив 3 3 3 2 4 2 4 2 2 1 1 1 2 4 5 5 1 4 1 5 4 2 3 3 4 2 3 2 4 2 5 3 4 1 1 4 3 4 4 2 максимум 17 в строке 8 минимум 20 в колонке 2
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
mariyburova200104.08.2021 03:18
-
marulina18.12.2020 00:14
-
tomikyrmash22.11.2022 17:30
-
ayala04127.04.2022 20:27
-
ArianaLi10.05.2022 16:38
-
nekit130708.08.2020 01:37
-
Bigdaddypro10030.01.2020 21:17
-
Daniilgrishin33333303.05.2022 18:48
-
Disna200626.06.2021 21:05
-
poulina1427.01.2023 03:47
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.