Напишите программу для решения следующей дано целое число является ли оно четным?
111
383
Ответы на вопрос:
Var a: integer; begin readln(a); if odd(a) then begin writeln('число а нечётное'); end else writeln('число а чётное'); end.
Популярно: Информатика
-
polyaХеХеХе03.07.2020 15:25
-
кузя21527.01.2020 08:55
-
Sashabolsun0411.08.2022 05:53
-
tanyalaim2006108.08.2021 01:39
-
RihDest30.12.2022 07:41
-
utseetstse29.01.2020 06:34
-
arturlatipov17.05.2022 18:31
-
tanysha2915.11.2020 20:12
-
Nukaka9l25.02.2022 06:47
-
Igarexaaa109.05.2022 20:52