Напишите программу которая в последовательности целых чисел определяет количество чисел кратных 6 или 11.программа получает на вход целые числа, количество введенных чисел неизвестно, последовательность чисел заканчивается числом 0 (pascal)
203
230
Ответы на вопрос:
Var a,n: integer; begin n: =0; writeln('вводите числа: '); readln(a); while a< > 0 do begin if (a mod 6 = 0)or(a mod 11 = 0) then n: =n+1; readln(a); end; writeln('n = ',n); end. пример: вводите числа: 45 24 80 55 74 31 0 n = 2
Во В обычном режиме
Во Электронная таблица - это а) это двумерные массивы, состоящие из столбцов и строк.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
Lifeismyy12.04.2020 10:09
-
SashaKromberg29.12.2020 20:29
-
Banannaa18.05.2020 11:54
-
KarakatitsaKrutitsa13.02.2021 01:46
-
leyal14.05.2021 17:44
-
baba2219.11.2020 09:25
-
melenam0804197408.01.2021 20:29
-
мангл00318.11.2022 09:17
-
ta2001nja13.03.2021 03:10
-
Sanyaaa1210.05.2022 07:42
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.