Предмет: Информатика,
автор: marknichiporenoxz0al
Вася и юра придумали новый язык. Слова в нем образуются от слов обычного русского языка, но после каждой гласной они ставят букву "C" и эту же гласную. Например слово "числитель" на их языке будет звучать "чисислиситесель". Напишите программу которая бы записсывала строку, состоящую из слов нормального русского языка, на новом, придуманном Васей и Юрой языке. (Входные данные, S-- письмо не более 255 символов)++(Выходные данные st--преобразованная строка)
Ответы
Автор ответа:
0
// PascalABC.NET 3.3, сборка 1547 от 07.10.2017
// Внимание! Если программа не работает, обновите версию!
begin
var Гласные:=['а','е','ё','и','о','у','ы','э','ю','я'];
var s:=ReadlnString;
for var i:=s.Length downto 1 do
if LowCase(s[i]) in Гласные then Insert('c'+LowCase(s[i]),s,i+1);
Writeln(s)
end.
Примеры
Числитель
Чиcислиcитеcель
Анастасия, принеси бумагу и силикатный клей!
Аcанаcастаcасиcияcя, приcинеcесиcи буcумаcагуcу иcи сиcилиcикаcатныcый клеcей!
// Внимание! Если программа не работает, обновите версию!
begin
var Гласные:=['а','е','ё','и','о','у','ы','э','ю','я'];
var s:=ReadlnString;
for var i:=s.Length downto 1 do
if LowCase(s[i]) in Гласные then Insert('c'+LowCase(s[i]),s,i+1);
Writeln(s)
end.
Примеры
Числитель
Чиcислиcитеcель
Анастасия, принеси бумагу и силикатный клей!
Аcанаcастаcасиcияcя, приcинеcесиcи буcумаcагуcу иcи сиcилиcикаcатныcый клеcей!
Похожие вопросы
Предмет: Химия,
автор: dima2020ignatov
Предмет: Биология,
автор: anastasiadombaj152
Предмет: Литература,
автор: Аноним
Предмет: Математика,
автор: valerabelousov1
Предмет: Математика,
автор: кит65