Помогите пожалуйста!
Дана строка, заменить все буквы о на а
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.
Похожие вопросы
1 год назад
1 год назад
1 год назад
2 года назад
2 года назад
8 лет назад
8 лет назад