По информатике, 10 класс, паскаль. нужно, чтобы - вопрос №108345829 от kolosochok1 29.08.2021 15:45

Question

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

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