По информатике, 10 класс, паскаль. нужно, чтобы - вопрос №834526110 от 45r77yf 19.03.2023 23:20

Question

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

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