Написать программы: ввести натуральное n: 1) вывести на экран все числа от nдо 1 в обратном порядке. ( n, n-1, n-2, n-3, … , 3, 2, 1) 2) вывести на экран все четные числа от 0 до n в порядке возрастания.

// PascalABC.NET 3.2, сборка 1417 от 28.03.2017
// Внимание! Если программа не работает, обновите версию!

begin
  Range(ReadInteger('n='),1,-1).Println;
  Range(0,ReadInteger('n='),2).Println
end.