1) С клавиатуры вводится трёхзначное число. Нужно вывести ответ «Да», если все его цифры четные, и ответ «Нет» в остальных случаях.

1 ответ

Посмотреть ответы

Megamozg

2205

Var
a,b,c,d:integer;
begin
writeln('Введите трехзначное число: ');readln(a);
b:= a div 100;
c:= a mod 100 div 10;
d:= a mod 10;
if (b mod 2 = 0)and(c mod 2 = 0)and(d mod 2 = 0)
then writeln('yes')
else writeln('no');
end.

Хороший ответ

2 декабря 2022 03:34

Остались вопросы?

Найти нужный

Еще вопросы по категории Информатика

Запись числа 23 в некоторой системе счисления выглядит так: 212q. Найдите основание системы счисления q. Заранее спасибо)... в языке запросов поискового сервера для обозначения логической операции ИЛИ используется символ I а для логической операции И символ & . В таблице... C++ как записать эту программу? Напишите функцию bool f(int x, int y), которая возвращает true, если x делится нацело на y, или наоборот, y делится н... Что будет выведено на экран после выполнения фрагмента программы? s = '123456789' s1 = 'abcdef' s = s[5:8] + '0' + s1[2:5] print(s) Запишите отв... 3 дочери писательницы Дорис Кей – Джуди, Айрис и Линда – тоже очень талантливы. Они приобрели известность в разных видах искусств – пении, балете и ки...