Создайте программу, которая запрашивает текстовую строку и заменяет букву а на бу-кву о. протокол: введите строку: страх и надежда могут убедить человека в чем угодно. получилось: строх и нодеждо могут убедить человеко в чем угодно. (вовенарг) ответ в паскаль турбо версия 7.0
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.