Срочно! Нужна помощь!!! 1. Заполнить массив натуральными числами 12345..... 2. Заполнить массив по правилу:1 3 5 7 9 11 13..... Вводится количество элементов массива (N меньше 100).

1.  var   a: array[1..100] of integer;   n, i: integer; begin   read(n);   for i := 1 to n do a[i] := i;   writeln('Полученный массив: ');   for i := 1 to n do write(a[i], ' '); end. 2. var   a: array[1..100] of integer;   n, i: integer; begin   read(n);   for i := 1 to n do a[i] := i * 2 - 1;   writeln('Полученный массив: ');   for i := 1 to n do write(a[i], ' '); end.