Cejurus
5 год назад
Создайте программу, которая запрашивает текстовую строку и заменяет букву а на бу-кву о.Протокол:Введите строку: Страх и надежда могут убедить человека в чем угодно.Получилось: Строх и нодеждо могут убедить человеко в чем угодно.(Вовенарг)Пж ответ в Паскаль Турбо версия 7.0
ОТВЕТЫ
Люба
Oct 24, 2020
//на каком-то старье
var
i: byte;
s: string;
begin
read (s);
for i:=1 to length (s) do if upcase(s[i])='А' then s[i]:='о';
write (s);
end.
var
i: byte;
s: string;
begin
read (s);
for i:=1 to length (s) do if upcase(s[i])='А' then s[i]:='о';
write (s);
end.
332
Смежные вопросы:
