Т3_С1 Количество четных
Напишите программу, которая считает количество чётных цифр введённого целого неотрицательного числа
Входные данные
Исходное число записано в переменную n целого типа
Выходные данные
Целое число
Ответы1
1441 год назад
Программа на Паскале:
var
s:string;
i,j,l:integer;
begin
readln(s);
for i:=1 to length(s) do begin
val(s[i],j);
if j mod 2 = 0 then inc(l);
end;
write(l);
end.
Надеюсь помог;)
