Обмен информации- это обмен информацией между двумя или большим числом людей
F(0)=1;
F(1)=1;
F(2)=1*1+1=2;
F(3)=2*1+1=3;
F(4)=3*2+1=7;
F(5)=7*3+1=22;
<span>F(6)=22*7+1=155.</span>
Const
m = 10;
var
a: array[1..m+1] of integer;
i, k: integer;
begin
write ('Исходный массив: ');
for i := 1 to m do
begin
a[i] := random(100);
write (a[i],'; ');
end;
writeln;
write('Введите число: ');
readln(k);
for i:=m+1 downto 1 do
begin
a[i]:=a[i-1];
if a[i] mod 2=0 then
begin
a[i-1]:=k;
break;
end;
end;
write('Измененный массив: ');
for i := 1 to m+1 do
write (a[i],'; ');
<span>end.</span>
Насколько я помню, то это основной текст, дополнительный текст, вспомогательный