Ответы на вопрос:
Цикл вида for i:=a to b do (Pascal) выполняется b-a+1 раз.
Цикл вида for x=a to b step h (Basic) выполняется FIX((b-a)/h)+1 раз, где FIX - операция получения целой части числа путем отбрасывания его дробной части.
program zn; var n,k,sum: integer; beginwriteln('введите натуральное число'); readln(n); while n< > 0 do begink: = n mod 10; if k mod 2 = 0 then sum: =sum+k; n: = n div 10; end; writeln('сумма четных чисел = ', sum); end.
(проверено и откомпелировано на pascal.net)
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
Nezox17515.02.2023 21:11
-
svitlanakost02.07.2022 17:21
-
Борель03.10.2022 10:16
-
салссо123296027.06.2022 06:18
-
superman4806.05.2023 00:20
-
Zheka564417.12.2020 05:27
-
Роднойязык1131.12.2022 14:58
-
мая10111.05.2020 06:13
-
alyamiller151324.04.2022 22:51
-
katyan1va13.01.2021 04:30
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.