Написать программу, которая печатает значение логического выражения (TRUE или FALSE):8. Среди цифр четырехзначного числа есть четная.
begin
ReadInteger('n=').ToString.Any(t -> t in '02468').Println
end.