Помогите написать программу в Паскаль.
Дан произвольный текст. Преобразовать его по следующим правилам: все буквы «о» заменяются на «оа», все пробелы заменяются символом «_», а запятые удаляются.

s- переменная текстаi- счетчикreadln(s);for i:= 1 to length(s) do begin  if (s[i]='о') then s[i]:='оа';    if  (s[i]=' ') then(s[i]='_')if (s[i]=',') then s[i]:='';writeln(s);end.   Вроде как-то так

// PascalABC.NET 3.1, сборка 1250 от 28.05.2016begin  var s:=ReadlnString('>');  s:=s.Replace('о','oa').Replace(' ','_').Replace(',','');  Writeln(s);end.Тестовое решение> "Дает корова молоко" - писать, конечно, не легко!"Дает_кoaрoaва_мoaлoaкoa"_-_писать_кoaнечнoa_не_легкoa!