С клавиатуры вводится число N Определить,может ли оно быть двоичным - VB

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

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

2)С клавиатуры вводится число N.Определить,может ли оно быть двоичным(т.е. состоять только из 0 и 1).

Решение задачи: «С клавиатуры вводится число N Определить,может ли оно быть двоичным»

textual
Листинг программы
Function IsBin(s$)
Dim i&
  i = 1 - (Left(s, 1) = "-")
  IsBin = Len(Replace(Replace(s, "0", "", i), "1", "", i)) = 0
End Function

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


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

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

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