1. Дан массив, заполненный случайным образом положительными числами. В массиве 10 элементов. Вставить в массив на седьмое место значение, равное 0, затем удалить из получившегося массива первый элемент. Вывести получившийся массив на экран. 2. В программе описан одномерный целочисленный массив А с индексами от 0 до 15. Чему будут равны элементы этого массива после выполнения фрагмента программы?
For i:=0 to 15 do A[i]:=i x z;
For i:=1 to 15 do A[i]:=A[i-1];
Оба задания требуется выполнить в программе Pascal. Спасибо.