Вставьте между словами в предложении точку с запятой вместо пробелов.

Дано предложение:

Человек без сомнений должен непременно вызывать сомнения окружающих.

Вставьте между словами в предложении точку с запятой вместо пробелов. При решении задачи необходимо использовать операторы для работы со строковой информацией. 

Программа:

Program Progr2;

var S: string;    

begin  

 write('Tекст: ');

 readln(S); 

 while (pos(' ',S)>0) do

  begin

   insert(';',S,pos(' ',S));   

   delete(S,pos(' ',S),1);      

  end;

 writeln(S);

end.