Question

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

Answer 1

//PascalABC.NET

//Версия 3.4.2

begin

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

end.