Увеличить каждый элемент массива а(12) на 8,125. элементы массива выводятся по формуле а(х)=5х-2. паскаль abc

var
a: array[1..12] of real;
x: integer;
begin
Writeln('Начальный массив:');
for x:=1 to 12 do
begin
a[x]:=5*x-2;
writeln('a[', x, ']=', a[x]);
end;
Writeln('Увеличим каждый элемент массива на 8,125:');
for x:=1 to 12 do
begin
a[x]:=a[x]+8.125;
writeln('a[', x, ']=', a[x]);
end;
end.