1)
var s: string; i: byte;
begin
writeln('Введите строку:');
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) это задание решено в другом Вашем вопросе
znanija.com/task/22037051
<span>Америка в 1877 году Шарлем Кро </span><span>и Томасом Эдисоном - граммафон</span>
1923 год. Джонг Мажер – Изобретение Электрофона и Калейдофона в Берлине
Магнитофон <span>в Берлине в 1935</span>
1) sqr(z)/(y+sqr(x)*x)+sin(y/5)=
2) 3x/(sqr(cos(y))+3)=
((1 - 4)^2 - 4)^2 - 4 = 21
(((5 + '1') / 3 + '1') / 3) / 3 = 19
Ребенок-Кукла-Форма
Событие-текст-отношение с другими объектами
Явление природы-макет-вид
Процесс создания объекта-план действий-алгоритм
Здание-рисунок-элементный состав
<span>Вот так, мы это делали.</span>