Вывести ** экран все четные числа от 1 до n Паскаль

Question

Вывести на экран все четные числа от 1 до n Паскаль

Answer 1

//PascalABC.NET

//Версия 3.4.2

begin

range(1,ReadInteger('n=')).Where(x->x.IsEven).Println;

end.