Вопрос, который вызвал трудности

Помогите !
1) Дана строка. Заменить все его символы, стоящие на нечетных местах, на букву "а"
2)Даны три слова вывести на экран самое короткое

Ответ экспертов Учись.Ru

Чтобы дать полноценный ответ, был привлечён специалист, который хорошо разбирается в теме «Информатика». Ваш вопрос звучал так:

Помогите !
1) Дана строка. Заменить все его символы, стоящие на нечетных местах, на букву "а"
2)Даны три слова вывести на экран самое короткое

После обсуждения с другими специалистами сервиса мы пришли к выводу, что правильный ответ на ваш вопрос будет звучать следующим образом:

1)
var s: string; i: byte;
begin
writeln('Введите строку:');
readln(s);
i:=1;
while i<=length(s) do begin<br>  delete(s,i,1);
  insert('a',s,i);
  i:=i+2;
end;
writeln(s);
end.
---------------------------------------------
Введите строку:
Меняем нечетные символы на а
aеaяaмaнaчaтaыa aиaвaлa aаaа
---------------------------------------------

2) это задание решено в другом Вашем вопросе znanija.com/task/22037051