Из элементов массива А, состоящего из 25 элементов, сформировать массив D той же размерности по правилу: первые 10 элементов находятся по формуле Di=Ai+i, остальные - по формуле Di=Ai-i. (паскаль)
More Questions From This User See All
Answers & Comments
program raf105;
var
a,d: array[1..25] of integer;
i: integer;
begin
write('Массив A: ');
for i:=1 to 25 do
begin
a[i]:= random(35,60);
write(a[i],' ');
end;
writeln;
write('Массив D: ');
for i:=1 to 25 do
begin
if i<=10
then d[i]:=a[i]+i;
if i>10
then d[i]:=a[i]-i;
write(d[i],' ');
end;
end.
PascalABC 3.4.2