Как заменить согласные буквы в тексте на 0 (pascal, - вопрос №010200565 от abra123 08.07.2021 06:11

Question

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

abra123 · Answer

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

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

begin

ReadlnString.

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

.Println

end.