Question

Найдите количество четных цифр в десятичной записи числа n

Answer 1

//PascalABC.NET
//Версия 3.3, сборка 1634
begin
write(abs(ReadInteger('n=')).ToString.Select(x->x.ToDigit).Where(t->t.IsEven).Count);
end.