В заданной строке определить количество слов, начинающихся и заканчивающихся на одну и ту же букву - VB

Формулировка задачи:

"В заданной строке определить количество слов, начинающихся и заканчивающихся на одну и ту же букву" и "В заданном массиве строк определить количество строк, у которых первый и последний символы совпадают." Сделать нужно через простейшие функции аля substring mid и тп

Решение задачи: «В заданной строке определить количество слов, начинающихся и заканчивающихся на одну и ту же букву»

textual
                            Листинг программы 
                        

                            List1.Clear
Dim a() As String
ReDim a(1 To Val(Text1.Text))
For i = 1 To Val(Text1.Text)
 a(i) = InputBox("Г‚ГўeГ¤ГЁ Г±ГІГ°Г®ГЄГі")
 List1.AddItem a(i)
Next i
                        

Оцени полезность:

14 голосов , оценка 4.143 из 5

Похожие ответы