Найдите количество нечетных чисел среди а, в, с

Question

Информатика

Клариса

11 октября, 15:56

Найдите количество нечетных чисел среди а, в, с

+1

Ответы (1)

Знаете ответ на вопрос?

Феофания · Answer 1

Var a, b, c: integer;

begin

read (a, b, c) ;

a : = a mod 2; {в результате, в а будет остаток от деления на 2, то есть 1 - если число нечетное}

b : = b mod 2;

c : = c mod 2;

write (a + b + c) ;

end.