Написать программу на языке паскаль. вводятся размер и элементы одномерного массива a(n), состоящего из целых чисел. подсчитать сумму простых чисел, оканчивающихся на 3. результат вывести на экран.
128
202
Ответы на вопрос:
uses crt; var a: array [1..100] of integer; i,n,s: integer; beginwriteln('введите размер массива'); readln(n); for i: =1 to n do begin writeln('введите элемент массива номер ',i); read(a[i]); end; for i: =1 to n do if a[i] mod 10=3 then s: =s+a[i]; writeln('сумма = ',s); end.
написано через pascalabc. если используете другой паскаль вместо первой строчки пишите "program 123; "
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
Gulshat5118.10.2022 05:10
-
angel226106.01.2022 21:18
-
MashaBelous10.02.2021 00:34
-
вика283212.06.2021 06:17
-
svetlana81kolesnik01.01.2021 20:34
-
lanedaGo20.06.2022 18:22
-
eliseygrid5305.01.2022 09:12
-
alyapareczkaya27.11.2020 11:08
-
МарусяЧешир21.05.2021 06:08
-
szaikin20.11.2020 03:28
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.