Решить на turbo pascal, дан массив целых чисел, состоящий из 10 элементов. заполнить его с клавиатуры. найти: − сумму элементов, имеющих нечетное значение; − вывести индексы тех элементов, значения которых больше заданного числа а. − определить, есть ли в данном массиве положительные элементы, кратные k (k вводить с клавиатуры) − заменить первый элемент, кратный 5, нулем.
241
338
Ответы на вопрос:
Const n = 10; var mas : array [1..n] of integer; i, sum, a, k, sch : integer; begin writeln('введите массив: '); for i: = 1 to n do readln(mas[i]); writeln('введите число a: '); readln(a); writeln('введите число k: '); readln(k); sum: = 0; for i: = 1 to n do if mas[i] mod 2 = 1 then sum: = sum + mas[i]; writeln('сумма элементов равна ',sum); writeln('индексы, значение элементов которых больше ',a,' : '); for i: = 1 to n do if mas[i] > a then write(i,' '); writeln; sch: = 0; for i: = 1 to n do if mas[i] mod k = 0 then sch: = 1; if sch = 1 then writeln('в массиве есть элементы, кратные ',k) else writeln('в массиве нет элементов, кратных ',k); for i: = 1 to n do if mas[i] mod 5 = 0 then begin mas[i]: = 0; break; end; end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
oleegglazunov27.01.2021 17:13
-
abakanilaha22.08.2021 17:13
-
натали2301198008.05.2023 03:27
-
innaalekseenko115.02.2023 03:42
-
гулллллл18.08.2021 02:33
-
kononovadm05.07.2020 02:17
-
andreyrekvinov13.05.2022 09:45
-
andrewbukharin203.09.2020 03:10
-
donchikbukhmas20.03.2023 09:09
-
легенда1922.01.2021 00:03
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.