Ответы на вопрос:
1) var a, b: integer; begin readln(a, b); if (a mod 2 = 0) and (b mod 2 = 0) then writeln('оба четные') else writeln('нет'); end. 2) var a, b: integer; begin readln(a, b); if (a mod 2 = 0) or (b mod 2 = 0) then writeln('является') else writeln('нет'); end.
Популярно: Информатика
-
dianapopova187911.02.2021 00:55
-
Арсений445528.05.2021 17:16
-
Даниил22322312.10.2021 07:15
-
gandurska101.03.2023 22:31
-
koblovalv25.02.2022 01:57
-
Windsorcastle28.03.2022 10:55
-
zill8130.04.2023 00:21
-
jdhhdd02.04.2022 11:41
-
Женя220V18.03.2023 02:04
-
weloyda16.11.2020 12:04