// PascalABC.NET 3.0, сборка 1156 от 30.01.2016 begin var s:=ReadlnString('Вводите:'); s:=s.Replace('AND','OR'); s:=s.Replace('And','Or'); s:=s.Replace('and','or'); Writeln; Writeln(s) end.
Тестовое решение: Вводите: And for the Birds? Mowgli let out a kite’s whistle. And now for the Snake People. The answer was a perfect hiss. Mowgli clapped his hands happily and jumped on Bagheera’s back.
Or for the Birds? Mowgli let out a kite’s whistle. Or now for the Snake People. The answer was a perfect hiss. Mowgli clapped his hors happily or jumped on Bagheera’s back.
Нужно увеличить задержку времени для каждого кадра анимации. Это можно сделать вручную: щелкаем по фоновому слою в панели "Диалог слоёв" правой клавишей мышки, и в выпадающем меню выбираем " Изменить атрибуты слоя" откроется окошко " Правка атрибутов слоя" в строчке имя слов в скобочках указана задержка между кадрами в миллисекундах пропишите её, для примера в два раза больше, и также измените задержку для каждого последующего слоя. Вот и все, запускайте анимацию и скорость ее произведения уменьшиться в два раза. А потом если у вас так получилось то не забудьте поставить
begin
var s:=ReadlnString('Вводите:');
s:=s.Replace('AND','OR');
s:=s.Replace('And','Or');
s:=s.Replace('and','or');
Writeln;
Writeln(s)
end.
Тестовое решение:
Вводите: And for the Birds? Mowgli let out a kite’s whistle. And now for the Snake People. The answer was a perfect hiss. Mowgli clapped his hands happily and jumped on Bagheera’s back.
Or for the Birds? Mowgli let out a kite’s whistle. Or now for the Snake People. The answer was a perfect hiss. Mowgli clapped his hors happily or jumped on Bagheera’s back.