Написать программы: Ввести натуральное N: 1) Вывести ** экран все числа от Nдо 1 в...

Question

Написать программы:

Ввести натуральное N:

1) Вывести на экран все числа от Nдо 1 в обратном порядке. ( N, N-1, N-2, N-3, … , 3, 2, 1)

2) Вывести на экран все четные числа от 0 до N в порядке возрастания.

Answer 1

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

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