| Вопрос: Пожалуйста, помогите написать программу. | Добавлено: 21.05.04 16:50 |
Автор вопроса:  MadAlex2004
|
|
Для встречающихся в заданном тексте пар рядом
расположенных символов указать, сколько раз встречается в тексте
каждое из таких двухбуквенных сочетаний. |
| Ответы | Всего ответов: 1 |
|
Номер ответа: 1 Автор ответа:  astoro ICQ: 649109 Вопросов: 31 Ответов: 391 |
Профиль | | #1 | Добавлено: 21.05.04 17:22 |
|
text="YOUR TEXT" Pair="YOUR PAIR" k=0 For i=1 to len(text)-1 if mid(text,i,2)=pair then k=k+1 end if next i msgbox (cstr(k))
|
||
Страница: 1 |