Ответы на вопрос:
// pascalabc.net 3.3, сборка 1600 от 23.12.2017 // внимание! если программа не работает, обновите версию! function kolichestvo(c: array [,] of integer): integer; begin result: =0; var n: =c.rowcount; for var i: =1 to n-1 do for var j: =n-i to n-1 do if c[i,j].iseven then result+=1 end; function massiv: array[,] of integer; begin var n: =readinteger('число строк/столбцов: '); result: =matrrandom(n,n,-99,99) end; begin var s: =massiv; s.println(4); writeln(4*s.colcount*'-'); var n: =massiv; n.println(4); writeln(4*n.colcount*'-'); var m: =sqr(kolichestvo(s)+kolichestvo(n)); writeln('m=',m) end. пример число строк/столбцов: 3 -77 -81 82 -30 -37 39 31 92 12 число строк/столбцов: 6 66 9 -64 -53 13 -61 16 -72 -25 38 -19 21 40 29 38 77 -38 11 31 76 -83 -17 -58 1 -2 39 -63 84 -35 -42 -23 -75 -57 92 -14 -73 m=64
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
george3904.06.2020 02:40
-
artem87518.12.2022 19:33
-
Meow44403.03.2023 21:12
-
Marinkasmirnova05.06.2020 11:45
-
Andrey11jr18.09.2020 20:53
-
асемок402.06.2021 11:06
-
mmmm029.05.2022 06:39
-
Стас132622.06.2023 02:25
-
krepkinapolina2913.08.2021 22:27
-
филькатв12.06.2023 01:19
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.