Категория - Информатика Автор - gak17 Запросить строку (string), заменить в ней гласные буквы русского алфавита на символ @.Задача на Паскале.
Категория - Информатика Автор - gak17 Запросить строку (string), заменить в ней гласные буквы русского алфавита на символ @.Задача на Паскале.
Ответ Автор - sablibk16 program ll1;var i, n: integer; s: string;begin readln(s); n:= Length(s); for i:=1 to n do if s[i] = 'а' or 'у' or 'е' or 'ы' or 'о' or 'э' or 'я' or 'и' or 'ю' then s[i]:='@'; write (s); end.Так?