В заданном предложении удалить символ

[perojenko]

помогите пожалуйста, завтр экзамен

В заданном предложении удалить символ "," (заменить пробелом) и подсчитать количество удаленных символов.

заранее спасибо

[Stilet]

Ну и что тут сложного?

for i:=1 to length(s) do begin
 if s[i]=',' then begin inc(kolvo); s[i]:=' '; end;
end;

[ketik]

Сообщение от Stilet

Ну и что тут сложного?

for i:=1 to length(s) do begin
 if s[i]=',' then begin inc(kolvo); s[i]:=' '; end;
end;

Виталий-ТЫ МЕГА МОЗГ!!!