Запишите алгоритм определения количества четных чисел среди заданных целых чисел 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 - это ты проверяешь на четность
n:=0;
если условие соблюдается n:=n+1- то n:=0+1