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

Ольга
Oct 24, 2020
Var
A:integer;
Begin
Write('Введите целое число: ');ReadLn(a);
For A:= A+1 to A+21 do
Write(A,' ')
End.
A:integer;
Begin
Write('Введите целое число: ');ReadLn(a);
For A:= A+1 to A+21 do
Write(A,' ')
End.
643
Смежные вопросы: