Процедура обработки строки состоит из двух последовательных операций: 1. заменить в строке все символы а на подстроку ав 2. заменить в строке все подстроки вв на символ с. процедура может выполняться многократно. в этом случае, при очередном вызове, на вход процедуре подаётся строка, получившаяся в результате предыдущего выполнения процедуры. например, если исходно была строка аав и процедура выполнилась 3 раза, то в результате получится строка авсасс пусть исходно была строка авав и процедуру выполнили 333 раза. определите количество каждого символа в получившейся строке. в ответе укажите через запятую три числа: сначала количество символов а, потом символов в, потом с.
2,0,334
Объяснение:
Excel VBA
Function newstr(str As String, n As Integer) As String
Dim i As Integer
For i = 1 To n
str = Replace(str, "a", "ab")
str = Replace(str, "bb", "c")
Next
newstr = str
End Function
Function chrcount(str1 As String, str2 As String) As Integer
Dim str() As String
str = Split(str1, str2)
chrcount = UBound(str, 1)
End Function
После вызова из ячейки функции
= chrcount(newstr("abab"; 333); "a")&","&chrcount(newstr("abab"; 333); "b")&","&chrcount(newstr("abab"; 333); "c")
получаем результат:
2,0,334