1) с клавиатуры вводится трёхзначное число. нужно вывести ответ «да», если все его цифры четные, и ответ «нет» в остальных случаях.
189
245
Ответы на вопрос:
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.
Популярно: Информатика
-
ангелина6789004.06.2020 19:58
-
Leonova2330.04.2021 22:36
-
sasha183616.08.2021 21:02
-
gly77oxlysj08.05.2022 07:53
-
anaStasyaplus04.07.2020 17:54
-
помидор232429.10.2020 23:51
-
УмничкаХороша09.01.2020 12:54
-
rfhfntkm7p06pep03.06.2023 18:48
-
viktoria16802.07.2021 04:11
-
Данил932317.12.2020 20:15