Объясните, что делает данный алгоритм ** Pascal: for i:=1 to n do begin...

Question

Объясните, что делает данный алгоритм на Pascal: for i:=1 to n do begin write('a(',i,')='); readln(a); if not odd(a) then inc(k); end; if k=0 then writeln('нет четных ') else writeln('количество четных...',k);

Comments

Считает количество введенных четных чисел

Answer 1

Ответ:

Считает количество введенных четных чисел

Объяснение: