По информатике, 10 класс, паскаль. нужно, чтобы после - вопрос №834616310 от артем1488337 12.01.2021 23:51

Question

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

артем1488337 · 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 класс, паскаль. нужно, чтобы после каждой буквы в строке ставилась буква "а".