Question

Напишите программу, которая принимает с клавиатуры целое число, а затем выводит 20 последующих за ним чисел. Язык Паскаль

Answer 1

Var
A:integer;
Begin
Write('Введите целое число: ');ReadLn(a);
For A:= A+1 to A+21 do
    Write(A,' ')
End.

Answer 2

Вот пример программы на языке Паскаль, которая принимает с клавиатуры целое число и выводит 20 последующих чисел:

program PrintNumbers;
var
  num, i: integer;
begin
  writeln('Введите целое число:');
  readln(num);
  
  writeln('20 последующих чисел:');
  for i := num + 1 to num + 20 do
    writeln(i);
end.

Эта программа сначала запрашивает у пользователя ввод целого числа. Затем она использует цикл `for` для вывода 20 последующих чисел, начиная с введенного числа плюс один.

Например, если пользователь вводит число 5, программа выведет числа от 6 до 25.

Примечание: Вам может потребоваться настроить окружение для компиляции и запуска программ на языке Паскаль.