Ответы
Ответ дал:
0
// PascalABC.NET 3.2, сборка 1417 от 28.03.2017
// Внимание! Если программа не работает, обновите версию!
begin
Range(1,ReadInteger('n=')).Println
end.
Пример
n= 20
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
// Внимание! Если программа не работает, обновите версию!
begin
Range(1,ReadInteger('n=')).Println
end.
Пример
n= 20
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
Вас заинтересует
1 год назад
1 год назад
3 года назад
3 года назад
9 лет назад