logo
Войти Регистрация Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
stas952011217217
stas952011217217
23.04.2021 18:41 •  Информатика

Программирование в кумире! ничегошеньки не понимаю.. введите целое число и определите верно ли что все его числа четные

Ответ:
илья8551
илья8551
08.10.2020 03:16
Алг
нач
цел a
лог f
f:=нет
ввод a
нц пока a<>0
если mod(mod(a,10),2)<>0 то
f:=да
выход
все
a:=div(a,10)
кц
если f=нет то вывод 'все цифры четные'
иначе вывод 'не все цифры четные'
все
кон
0,0(0 оценок)
Популярные вопросы: Информатика
karinkacommelЛіза
karinkacommelЛіза
17.11.2020 13:00
дано целое число Напишите программу вычисления если это число имеет положительное значение то Добавить к нему цифру 1 иначе выведет его без изменений​...
Альмира2007
Альмира2007
15.05.2022 09:16
Які недоліки можна виявити при перегляді презентації​...
PabloDC
PabloDC
28.12.2021 08:23
Даны три числа A B и C Составьте программу которая вычисляет произведение этих чисел если выполняется условие a²-b²=c² в противном случае их сумму​...
denisвопрос
denisвопрос
27.09.2022 02:50
, распределите по ответам 1) Из скольки бит состоит MAC адрес? 56 48 24 32 2) Unicast адрес – это адрес коммутатора адрес принадлежащий одному устройству групповой адрес адрес...
kartofan2016p08uuy
kartofan2016p08uuy
09.02.2022 17:20
, сделать второй рисунок(3.23) в скретче и корону!​​...
Snowghost
Snowghost
24.06.2020 02:33
Найти наибольшую и наименьшую цифры в записи данного натурального числа (python) ​...
Лика113998
Лика113998
03.03.2020 17:03
Натуральные числа а, b, с называются числами Пифагора, если выполняется условие а^2+b^2=c^2 Напечатать все числа Пифагора, меньшие N. (python) ​...
кио4
кио4
11.06.2021 17:04
Что демонстрирует данная операция?Что выйдет в конечном итоге? constN=25;vara:array[1..N] of integer;i:byte;sum:integer;beginrandomize;for i:=1 to N beginarr [i]:=random (10)-5;write...
lewa0131
lewa0131
10.04.2021 21:16
A в 16 системе счисления =0,143511...
MELEKLER87
MELEKLER87
22.04.2021 22:21
СЕРЕДОВИЩЕ ВИКОНАННЯ: Pyton Створіть програму для обчислення кількості парних елементів усписку, заповненого випадковими числами.​...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
О НАС
СООБЩЕСТВО
ПОМОЩЬ
App
.
.
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?