begin
var s:=ReadlnString;
s:=s.Replace('cos','косинус');
s.Println
end.
var текст = prompt("Текст:"); alert(текст.replace(/cos/g, "косинус"));
begin
var s:=ReadlnString;
s:=s.Replace('cos','косинус');
s.Println
end.
var текст = prompt("Текст:"); alert(текст.replace(/cos/g, "косинус"));