Question

Заполнить массив А первыми Н натуральными числами, начиная сХ(ввести Х с клавиатуры) 

Answer 1

var i,n,x:integer;
a:array[1..100]of integer;
begin
  redln(n,x);
  for i:= 1 to n do
  a[i]:=x+i-1;
  //дальнейшие операции с массивом
end. 

Answer 2

Спасибо)

Answer 3

пожалуйста)