Сложный VB

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

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

разработать программу для перевода 2 числа(10101) в 10 число помогите пожалуйста

Решение задачи: «Сложный VB»

textual
Листинг программы
Dim decN, binN
binN = "10101"
For i = 1 To Len(binN)
decN = decN + Mid(binN, i, 1) * (2 ^ (Len(binN) - i))
Next i
MsgBox decN

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


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

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

11   голосов , оценка 3.636 из 5