Помогите найти программу для free pascal которая удаляет пробелы ?

напиши... что там строка и беги циклом по ней пока не пробел...
потом заполняй или сдвигай остальную часть...
быстрее написать чем найти

Разве у string нету функции replace? Замени ей все пробелы на "". Ну или элементарно замути while или for ... to цикл длиной с string в котором string==" " будет заменятся на string=="".

сам напиши )))

гы гы гы учебники в руки и вперёд

~
var
    S    : string;
begin
    ReadLn (s);
    WriteLn ("without spaces: " & StringReplace (s, " ", "", [rfReplaceAll, rfIgnoreCase]));
end.