Проверить истинность высказывания: «Хотя бы одно из чисел A и B нечетное»

Даны два целых числа: A, B.

code: #pascal
Program Boolean9;
Var
A,B:Integer;
Begin
ReadLn(A,B);
WriteLn(Odd(A) Or Odd(B));
end.

автор: Sklyarov Sergej a.k.a. S9

Поделиться:

Похожие статьи: