Акпараттын озектилиги, кундылыгы мен нактылгын аныктаудын кандай жолдары бар ?
114
164
Ответы на вопрос:
Var s, k, err: integer; str: string; begin writeln('введённая пустая строка (без каких-либо символов) считается концом последовательности и, собственно, завершает выполнение программы, как бы говоря ей: "эй, подруга! выведи-ка количество чисел, не делящихся ни на два, ни на семь, ни на одиннадцать! "'); while (true) do begin readln(str); val(str, k, err); if (err > 0) then break; if ((k mod 2 = 0) and (k mod 7 = 0) and (k mod 11 = 0)) then inc(s); end; writeln(s); end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
tatyanalarina204.06.2021 01:25
-
Сенсей1409.05.2021 20:00
-
sevaismailova220.10.2020 21:39
-
Telman0716.01.2020 19:14
-
virakudleychuk16.03.2021 17:09
-
ANADTYEE28.07.2020 22:55
-
YuliaVaskiv13.04.2021 18:09
-
OlegJexLP06.04.2022 13:34
-
ВаняАВЕР200608.12.2021 03:19
-
СветланаРассвет09.02.2021 00:25
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.