Составить программу, в которой каждая буква "а", которая встречается в тексте, заменить на группу символов "ку" - Pascal

Формулировка задачи:

Составить программу, в которой каждая буква "а", которая встречается в тексте, заменить на группу символов "ку". Например: "апи" - "купи".

Решение задачи: «Составить программу, в которой каждая буква "а", которая встречается в тексте, заменить на группу символов "ку"»

Листинг программы

var s:string;
    i:integer;
begin
writeln('Введите строку содержащую буквы а');
readln(s);
for i:=length(s)downto 1 do
if s[i]='а'then
 begin
  delete(s,i,1);
  insert('ку',s,i);
 end;
write(s)
end.

Объяснение кода листинга программы

Объявлены две переменные: строка s и целое число i.
Пользователю предлагается ввести строку, содержащую букву а.
Введенная строка сохраняется в переменной s.
Запускается цикл, который проходит по всем символам строки s, начиная с последнего.
Внутри цикла проверяется, является ли текущий символ а.
Если символ является а, то он удаляется из строки s, а на его место вставляется ку.
После завершения цикла выводится измененная строка s.