Pascal найти наименьшие элементы в каждом столбце матрицы х(5,5) и переписать их в одномерных массив а.в массиве а вычислить сумму элементов,стоящих на четных местах и произведение элементов,стоящих на нечетных
местах.массив а,сумму и произведение вывести на экран
186
419
Ответы на вопрос:
program n1; uses crt; const n=5; var x: array[1..n,1..n] of integer; a: array[1..n] of integer; i,p,s,j: integer; beginclrscr; randomize; for i: =1 to n do for j: =1 to n do x[i,j]: =random(100); j: =1; repeatfor i: =1 to n do if a[j]< x[i,j] then a[j]: =x[i,j]; write(a[j]: 4); j: =j+1; until j=n+1; p: =1; writeln; for i: =1 to n do if i mod 2=0 then s: =s+a[i] else p: =p*a[i]; writeln('proizvedenie =',p,',summa =',s); readlnend.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
senyaavdeev0730.03.2022 09:21
-
kukusiki1234514.06.2020 13:28
-
вико200614.11.2020 18:32
-
coffeepro8025.11.2020 19:24
-
qq50309.04.2022 11:18
-
rozella201704.01.2020 09:09
-
ofdgf19.03.2020 06:18
-
coollest14.04.2021 08:40
-
zhuravskaya199104.11.2022 03:34
-
ДашинСамурай15.01.2023 21:44
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.