Запишите алгоритм определения количества четных чисел среди заданных целых чисел A,B и С)

var
a,b,c,n:integer;
begin
n:=0;
readln(a);
readln(b);
readln(c);
if (a mod 2)=0 then
n:=n+1;
if (b mod 2)=0 then
n:=n+1;
if (c mod 2)=0 then
n:=n+1;
writeln(kolichestvo= , n);
end.
Вопрос,объясните пожалуйста строчку "если(а ост. 2)=0,то n:=n+1") что?

if  a mod 2= 0  then - это ты проверяешь на четность

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.