Дано рядок символів. Перетворити рядок, замінивши в ньому всі знаки оклику крапками. Треба зробити в Pascal.
S := S.Replace('!', '.');
var
S := 'Один! Два.! Три!!!';
begin
writeln(S);
end.