Увеличить каждый элемент массива А(12) на 8,125. Элементы массива выводятся по формуле А(х)=5х-2. Паскаль ABC
Увеличить каждый элемент массива А(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.
Не нашли ответ?
Похожие вопросы