Question

Выведите на экран натуральные числа, меньшие числа n. ABC Pascal

Answer 1

Var
  n, i: int64;
 begin
  read(n);
  for i := n - 1 downto 1 do
    write(i,' ');
end.

Answer 2

Для вывода на экран натуральных чисел, меньших числа n, в языке Pascal можно использовать цикл for.

Пример кода:

program NaturalNumbers; var n, i: integer; begin writeln('Введите число n:'); readln(n); writeln('Натуральные числа, меньшие числа ', n, ':'); for i := 1 to n-1 do writeln(i); end.

В данном примере мы объявляем переменные n и i типа integer. После этого запрашиваем у пользователя ввод числа n.

Затем мы выводим на экран строку, указывающую на то, что будем выводить натуральные числа, меньшие числа n.

Далее, с помощью цикла for, проходим от 1 до n-1 и выводим каждое число на экран с помощью функции writeln.

Например, если пользователь вводит число 5, то на экран будет выведено:

1 2 3 4