ПАСКАЛЬ.Дан массив из 100 элементов. Необходимо заполнить первые n из них первыми n натуральными числами в порядке возрастания Формат входных данных С клавиатуры вводится натуральное число n (n≤100n≤100). Формат выходных данных Требуется вывести содержимое первых nn элементов массива после заполнения согласно условию задачи. Элементы должны разделяться пробелами.
Var ar:array[1..100]of integer; i,n:integer; begin read(n); for i:=1 to n do ar[i]:=i; for i:=1 to n do write(ar[i],' '); end.