Увеличить каждый элемент массива А(12) на 8,125. Элементы массива выводятся

по формуле А(х)=5х-2. Паскаль ABC

1

Ответы и объяснения

Лучший Ответ!
2013-05-07T10:52:23+00:00

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.