Как заменить согласные буквы в тексте на 0 (pascal, - вопрос №102001650 от AlinaMalina1011 09.05.2021 20:45

Question

Информатика: Как заменить согласные буквы в тексте на 0 (pascal, не используя s[i])

AlinaMalina1011 · Answer

Это правильно не нужны тут никакие s[i], и даже сама s не нужна. Решение в один оператор.

===== PascalABC.NET =====

begin

ReadlnString.

RegexReplace('(?i)[БВГДЖЗЙКЛМНПРСТФХЦЧШЩЪЬ]','0')

.Println

end.