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

1)var s: string; i: byte;beginwriteln('Введите строку:');readln(s);i:=1;while i<=length(s) do begin  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) это задание решено в другом Вашем вопросе https://znanija.com/task/22037051