Проверить истинное высказывание "ровно одно из чисел a и b нечётное". программа в pascal

inzi05 inzi05    3   07.10.2019 00:50    3

Ответы
7777kiti 7777kiti  10.10.2020 00:41

var a, b: integer;

begin

 Read(a, b);

 Write(Odd(a) xor Odd(b))

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика