Задача на строки, Нужна ваша помощь... Опции

[TeoRetiC]

Дана строка S:='B+1,qwerty,TU154,IL86,j+j,1.2+31.07E-01'. Преобразовать 8 последних символв в число с фикс. точкой. Получить на основе строки S новую строку путём замены '+' на '-', удвоения всех цифр и добавления ' ' после каждого ','. Решил практически всю программу, но уткнулся в проблему с удвоением всех цифр и не могу сделать вперёд ни шагу... Помогите пожалуйста...

[AruNimotsi]

Удвоение цифр это на два перемножить или из 8 сделать 88??
в любои случае создай новую переменную (например S2)
для дубляжа будет выглядеть примерно так:

Код

  
   for i:=1 to length(s) do
        begin
        S2:=S2+S[i];
         for j:=0 to 9 do
         if S[i]=IntToStr(j) then S2:=S2+S[i];
         end;