Количество чисел в строке - VB

Узнай цену своей работы

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

В общем, нужно написать программу, подсчитывающую кол-во чисел в строке. Ну допустим ввели "12333345555", получаем 5

Решение задачи: «Количество чисел в строке»

textual
Листинг программы
Function f(s$) As Long
Dim i&
For i = 1 To Len(s)
    If InStr(i + 1, s, Mid$(s, i, 1)) = 0 Then f = f + 1
Next
End Function

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

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

5   голосов , оценка 3.4 из 5
Похожие ответы