Массивы (Pascal ABC)

[studentcrew]

всем доброго времени суток.
очень нужна ваша помощь, не могу разобраться с этими задачами

1. В массиве записаны значения роста каждого из 20 учеников класса. В середине года в класс был принят новый ученик, рост которого должен быть записан в пятую ячейку массива. Внесите это изменение в массив.

2. см.вложение

Заранее благодарен за помощь!

[Хыиуду]

1. for i:=20 downto 5 do A[i+1]:=A; A[5]:=new_student_height;
2. for i:=1 to N do
for j:=1 to M do
if (A[i,j]%2=0) then inc(sum, A[i,j]);