Помогите переделать программу. Чтобы получилось:
"Ехал Ваня на коне
Вел сабаку на ремне
А старушка в это время
Мыла фикус на окне"
Не обязательно делать правильные окончания.

begin
  var a:='Ехал фикус на коне';
  var b:='Вёл старушку на ремне';
  var c:='А собака в это время';
  var d:='Мыла Ваню на окне';
  var m1:=a.ToWords;
  var m2:=d.ToWords;
  Swap(m1[1],m2[1]);
  a:=m1.JoinIntoString;
  d:=m2.JoinIntoString;
  m1:=b.ToWords;
  m2:=c.ToWords;
  Swap(m1[1],m2[1]);
  b:=m1.JoinIntoString;
  c:=m2.JoinIntoString;
  Writeln(a,NewLine,b,NewLine,c,NewLine,d)
end.

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.