как заменить согласные буквы в тексте на 0 (pascal, не используя s[i])
vsg76168:
11
Ответы
Ответ дал:
0
Это правильно не нужны тут никакие s[i], и даже сама s не нужна. Решение в один оператор.
===== PascalABC.NET =====
begin
ReadlnString.
RegexReplace('(?i)[БВГДЖЗЙКЛМНПРСТФХЦЧШЩЪЬ]','0')
.Println
end.
Приложения:
![](https://st.uroker.com/files/3d7/3d7f666992d99ccd761d9dea5c051a07.jpg)
Вас заинтересует
4 месяца назад
4 месяца назад
5 месяцев назад
5 месяцев назад
2 года назад
2 года назад