Как заменить согласные буквы в тексте на 0 (pascal, - вопрос №010200390 от OМайгад 27.12.2021 18:19

Question

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

OМайгад · Answer

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

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

begin

ReadlnString.

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

.Println

end.