Напишите программу, которая заполняет массив из N элементов последовательными натуральными числами, начиная с X , и выводит его. пожалуйста на языке Pascal
Напишите программу, которая заполняет массив из N элементов последовательными натуральными числами, начиная с X , и выводит его. пожалуйста на языке Pascal
Ответ(ы) на вопрос:
Гость
var ar: array[1..10000]of integer;
i, n, x: integer;
begin
write('Введите N:');
read(n);
write('Введите X:');
read(x);
for i := 1 to n do
begin
ar[i] := x;
x:=x+1;
write(ar[i], ' ');
end;
end.
Не нашли ответ?
Похожие вопросы