По информатике, 10 класс, паскаль. нужно, чтобы после - вопрос №834616310 от Yana18102001 16.09.2020 15:25

Question

Информатика: По информатике, 10 класс, паскаль. нужно, чтобы после каждой буквы в строке ставилась буква а .

Yana18102001 · Answer

// PascalABC.NET 3.3, сборка 1590 от 03.12.2017
// Внимание! Если программа не работает, обновите версию!

begin
var s:=ReadlnString('Введите строку');
for var i:=s.Length downto 1 do
if s[i]<>' ' then Insert('а',s,i+1);
Writeln(s)
end.

Пример
Введите строку Мама мыла раму маша ела кашу
Мааамааа маыалааа рааамауа мааашааа еалааа кааашауа

По информатике, 10 класс, паскаль. нужно, чтобы после каждой буквы в строке ставилась буква "а".