Заповніть масив А натуральними числами від 1 до 10 та вивести його на екран у рядок.(Паскаль)

не до конца понятно как именно надо заполнять потому два варианта begin     ArrRandomInteger(10, 1, 10).Println;     ArrGen(10, 1, x -> x + 1).Println; end. или так const     n = 10; var     a: array[1..n] of integer;     i: integer; begin     for i := 1 to n do     begin         a[i] := i;         write(a[i], ' ');     end;      end.