Дано слово. Добавить к нему в начале четыре символа"+" и в конце—пять символов"–".

Объяснение:Временные значения денег

В зависимости от точки зрения, номинальное значение денег может быть различным. Ключевое понятие здесь — временное значение денег. Вычисления, производимые над денежными суммами, могут производиться в настоящем или в будущем. Выбор типа вычислений основывается на

том, что сумма денег увеличивается, поскольку постоянно поступают начисления по процентам. Другими словами, вложив

один рубль сегодня, завтра вы получите больше.

Например, предположим, что богатенький заокеанский

дядюшка решил подарить вам деньги, причем нужно выбрать

один из вариантов.

Получить 80 000 руб. сегодня.

Получить 95 000 руб. через год.

Получить 120 000 руб. через пять лет.

Получать 1 500 руб. каждый месяц на протя

Var St: string;
 z:string[10];
 x:string[2];
i,j,k,m: integer;           //новые переменные
Begin
Write('введите строку текста - St');
Readln(St);
k:=0;                       //обнуляем на всякий случай
z:='0123456789';
i:=1;
for j:=1 to length(St) do //начало
 begin;
  for m:=1 to 10 do
   if St[j]=z[m] then inc(k);
 end;
if k=0 then
begin;
 writeln('в тексте нет цифр');
 exit;
end;                              //конец
while i<=length(st)-1 do
begin
x:=copy(st,I,2);
if (x[1]=x[2]) and (pos(x[1],z)<>0) then
begin
delete(st,i,2);
insert('две',st,i);
i:=i+1;
end;
i:=i+1;
end;
writeln('преобразованная строка ', st);
End.