Ответы на вопрос:
// pascalabc.net 3.1, сборка 1192 от 07.03.2016 begin var n: =readinteger('введите число'); writeln((n mod 2=0) and (n> 0)) end.
Популярно: Информатика
-
horki107.06.2022 10:23
-
гагарин917.02.2021 23:33
-
arzanix08.03.2021 21:57
-
Kornella12.10.2020 00:57
-
лютебя25.12.2020 10:33
-
Nyoken02.02.2023 08:39
-
Даниил55577706.03.2022 14:19
-
295f9gh27.09.2022 03:28
-
rtrc200206.01.2023 08:30
-
texet102424.06.2020 09:58