2. даны 3 двумерных массива a, b, c неодинаковой размерности. разработать 2 процедуры: 1) процедуру для ввода размеров и элементов массива. 2) процедуру вычисления суммы диагональных элементов в каждом массиве. в программе вычислить общую сумму диагональных элементов 3-х массивов. результаты выдать на экран. нужен
123
155
Ответы на вопрос:
// pascalabc.net 3.2, сборка 1417 от 28.03.2017 // внимание! если программа не работает, обновите версию! type mas=array[,] of integer; procedure getmas(s: string; var a: mas); begin writeln('*** массив ',s,' ***'); var n: =readinteger('количество строк в массиве: '); var m: =readinteger('количество столбцов в массиве: '); writeln('вводите элементы массива'); a: =readmatrinteger(n,m) end; function sumdiag(a: mas): integer; begin result: =0; for var i: =0 to min(a.rowcount,a.colcount)-1 do result+=a[i,i] end; begin var a,b,c: mas; getmas('a',a); getmas('b',b); getmas('c',c); writeln('общая сумма элементов главных диагоналей равна ', sumdiag(a)+sumdiag(b)+sumdiag(c)) end. пример *** массив a *** количество строк в массиве: 3 количество столбцов в массиве: 4 вводите элементы массива -33 -50 34 -41 -31 10 37 31 32 -49 -32 -27 *** массив b *** количество строк в массиве: 2 количество столбцов в массиве: 2 вводите элементы массива -22 35 0 11 *** массив c *** количество строк в массиве: 3 количество столбцов в массиве: 2 вводите элементы массива 23 38 17 -8 16 -1 общая сумма элементов главных диагоналей равна -51
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
nestann20.02.2021 23:37
-
Nik1023422.01.2020 14:10
-
anatolibikov126.11.2022 17:52
-
али42608.02.2023 11:00
-
ChelovekNosok03.03.2022 22:16
-
flag416.01.2023 04:28
-
kacok213.09.2021 23:01
-
nurbo5555555555114.05.2022 04:40
-
Aleshchksuni23.12.2020 17:48
-
saulefazylovnap00xfc22.10.2021 18:06
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.