Дан одномерный массив,состоящий из n целых чисел.Прибавить к каждому элементу массива число 5.Вывести получившийся массив на экран — Pascal(Паскаль)

program _;
const
n=4; //количество элементов массива
var
a:array[1..100] of integer;
i:integer;
begin
writeln('введите элементы массива');
for i:=1 to n do
begin
read(a[i]);
a[i]:=a[i]+5;
end;
writeln('Новый массив:');
for i:=1 to n do
write(a[i],'  ');
end.