Опубликовано 10.06.2017 по предмету Информатика от Гость >> <<

Напишите программу в pascal, которая в текст перед словом "большой" вставляет слово "очень".

Ответ оставил Гость

Const
  c1=Мы испекли большой каравай;
  c2=большой;
  c3=очень;
 
var
  s:string;
  i:integer;
begin
  s:=c1;
  Writeln(s);
  i:=Pos(c2,s);
  if i>0 then Insert(c3+ ,s,i);
  Writeln(s)
end.

Результат выполнения программы:
Мы испекли большой каравай
Мы испекли очень большой каравай