Паскаль. ввести n чисел. найти количество четных чисел среди них. )

Question

Информатика: Паскаль. ввести n чисел. найти количество четных чисел среди них. )

zenix122 · Answer

program n_1;var n, i, m, s: integer;begin    s:=0;    read(n);    for i:=1 to n do begin        read(m);        if m mod 2 = 0 then s:=s+1;    end;    writeln(s);end....

Паскаль. ввести n чисел. найти количество четных чисел среди них. )

Популярные вопросы