Помогите,очень надо!!! Дан массив.Вставить число 100 перед пятым элементов массива.

Var ar:array[1..100] of integer; //объявили массив
begin //начало программы
ar[4]:=100; //синтакисис присвоения: имя массива[позиция]:=значение
writeln(ar[4]); //чтобы все убедились
end. //конец программы
//что сложного?