11-А (физико-математический) Основы программирования

Составить алгоритм, который каждую букву "a", встречающуюся в тексте, заменит на группу символов "ку" (например, "ади"-"куди").

Комментарий: в исходной строке символов S ищем букву "а", формируем новую строку S_NEW, в которой вместо буквы"а" запишем "ку"; если текущий символ не "а", то переписываем его в строку S_NEW без изменений.

program zam;
var i:integer; s, s_new:string[20];
begin
write('введите строку');
readln(s);s_new:='';
for i:=1 to length(s) do
if s[i]='a' then s_new:=s_new+'ку' else s_new:=s_new+s[i];
write('новая строка:',s_new)
end.