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

Question

Информатика

Эсфира

23 ноября, 14:41

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

+3

Ответы (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.