Предмет: Информатика,
автор: SaskeU
Помогите пожалуйста!
Дана строка, заменить все буквы о на а
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.
Интересные вопросы
Предмет: Литература,
автор: dengayduk2
Предмет: Алгебра,
автор: veronikazinchenko14
Предмет: Математика,
автор: loh086484
Предмет: Математика,
автор: крісті4
Предмет: Математика,
автор: SuperROPE