Ответы на вопрос:
Var a,b,c: integer; begin; readln(a); readln(b); readln(c); if (a mod 2=0) and (b mod 2=0) and (c mod 2=0) then writeln('ура') else if ((a mod 2=0) and (b mod 2=0)) or ((a mod 2=0) and (c mod 2=0)) or ((b mod 2=0) and (c mod 2=0)) then writeln('уже хорошо') else if (a mod 2=0) or (b mod 2=0) or (c mod 2=0) then writeln('не все так плохо') else writeln('повезет в следующий раз'); end.
Популярно: Информатика
-
Egor19060626.07.2022 07:47
-
TeReNoRi15.01.2022 10:22
-
mihailsokolenk28.08.2020 15:16
-
скрытник30.09.2020 13:56
-
AlexOge28.04.2023 22:40
-
Лиззовета27.03.2020 10:20
-
Dhbdej26.02.2021 10:54
-
Misha21110309.04.2022 08:09
-
horarharry14.09.2022 21:57
-
Незнаюзачемтутник20.04.2023 15:43