Составьте блок-схему алгоритма определения количества четных чисел среди заданных целых чисел a b и c

Question

Информатика

Дюся

22 августа, 16:19

Составьте блок-схему алгоритма определения количества четных чисел среди заданных целых чисел a b и c

+1

Ответы (1)

Знаете ответ?

Олегушка · Answer 1

Var

a, b, c, s:integer;

Begins:=0;

writeln ('Введите 3 числа') ;

readln (a, b, c) ;

If a mod 2=0 then s:=s+1;

If b mod 2=0 then s:=s+1;

If c mod 2=0 then s:=s+1;

writeln ('Количество четных чисел=', s) ;

end.