Помогите пожалуйста!
Дана строка, содержащая слова, разделенные одним или несколькими пробелами. Написать программу, заменяющую каждый пробел парой символов "!?". Паскаль

var  s:string;  i:integer;begin  readln(s);  while (pos(' ',s)<>0) do  begin    i:=pos(' ',s);    delete(s,i,1);    insert('!?',s,i);  end;  writeln(s);  readln;end.

// PascalABC.NET 3.3, сборка 1627 от 27.01.2018// Внимание! Если программа не работает, обновите версию!begin  var s:=ReadlnString;  s:=s.Replace(' ','!?'); s.Printlnend.ПримерМама    мыла рамуМама!?!?!?!?мыла!?раму