Program Boolean3;
Var
A: Integer;
Begin
ReadLn(A);
WriteLn(Not Odd(A));
end.
Похожие записи/страницы:
- Проверить истинность высказывания: «Данное число является четным двузначным» - Pascal(Паскаль)
- Дано целое число A. Проверить истинность высказывания: «Число A является положительным» - Pascal(Паскаль)
- Дано целое число A. Проверить истинность высказывания: «Число A является нечетным» - Pascal(Паскаль)
- Проверить истинность высказывания: «Данное число является нечетным трехзначным» - Pascal(Паскаль)
- Составьте программу, проверяющую, верно ли утверждение, что введенное вами целое число является четным. -…
- Проверить истинность высказывания: «Данное число читается одинаково слева направо и справа налево» - Pascal(Паскаль)
- Проверить истинность высказывания: «Цифры данного числа образуют возрастающую или убывающую последовательность»…
- Проверить истинность высказывания: «Цифры данного числа образуют возрастающую последовательность» - Pascal(Паскаль)