Question

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

Answer 1

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

Answer 2

Огромное спасибо:)