Помогите пожалуйста!
Дана строка, заменить все буквы о на а
Pasckal ABC
AnonimusPro:
буквы о и а русские?
Ответы
Ответ дал:
1
var s: string;
i: integer;
begin
readln(s);
for i:=1 to length(s) do
if s[i]='o' then s[i]:='a';
write(s);
end.
Вас заинтересует
4 месяца назад
4 месяца назад
5 месяцев назад
2 года назад
2 года назад
7 лет назад
7 лет назад