замена символа в строке на другой символ, замена символа в строке на другой символ Опции

[marwell]

плиз, помогите решить, а то чет не получается В строке символов надо везде, где встречается символ "пробел", заменить его на два "пробела"

[volvo]

Да? Ну, попробуй:

s := 'вот  тебе  задачка    123';

Приведи решение с циклом For, я посмотрю, как, используя информацию об ИЗНАЧАЛЬНОЙ длине строки ты обработаешь последние пробелы... Никаких предварительных пробегов по строке, ибо While-вариант обойдется без этого...

Еще раз: НЕ записать в другую строку, а добавить в эту же, по условию...

Все равно нам надо просмотреть именно ТО количество символов, которое было в первоначальной строке, а добавленные - не просмаривать.

Ты задание читал внимательно? Нам надо добавлять пробелы не в конец сроки, а в середину...

[Lapp]

Ты задание читал внимательно? Нам надо добавлять пробелы не в конец сроки, а в середину...

volvo, я что-то совсем перестал тебя понимать.. Я так туплю?
Что тут плохого:

var
  s: string;
  i: integer;

begin
  s := 'вот  тебе  задачка    123';
  for i:=Length(s) downto 1 do if s[i]=' ' then begin
    Delete(s,i,1);
    Insert('  ',s,i)
  end;
  WriteLn(s);
  ReadLn
end.

- ?

Добавлено через 2 мин.
Delete я вставил для большей общности (типа замена на два других символа)