Задать вопрос
12 сентября, 17:52

Составить программу перевода натурального числа из десятичной системы счисления в двоичную.

VBA, без массивов.

+5
Ответы (1)
  1. 12 сентября, 21:41
    0
    Function Dec2Bin (ByVal x As Integer) As String

    Dim t As Integer, r As String

    r = "": t = x

    While t > = 2

    r = Trim (Str (t Mod 2)) + r

    t = t / 2

    Wend

    Dec2Bin = Trim (Str (t)) + r

    End Function

    Sub test ()

    MsgBox Dec2Bin (35)

    End Sub
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Составить программу перевода натурального числа из десятичной системы счисления в двоичную. VBA, без массивов. ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы
Похожие вопросы по информатике
5. Системы счисления. a. Переведите данное число из десятичной системы счисления в двоичную, восьмеричную и шестнадцатеричную системы счисления: 114,22510 b. Переведите данные числа в десятичную систему счисления: 100111100,11012 1234,58 2B3, F416 c.
Ответы (1)
1.11010101,00011 переведите число из двоичной в десятичную систему счисления 2.10111101,110111 переведите число из двоичной в восьмиричную систему счисления 3.101100010100,1011 переведите число из двоичной в шестнадцатиричную систему счисления 4.
Ответы (1)
1) Переведите число А2 из шестнадцатеричной системы в двоичную систему счисления. 2) Переведите число 143 из десятичной системы счисления в двоичную систему счисления.
Ответы (1)
1) Десятичное число 4563 в двоичной системе счисления равно 2) Десятичное число 800 в восьмеричной системе счисления равно 3) Десятичное число 781 в шестнадцатеричной системе счисления равно 4) Двоичное число 1000000 в десятичной системе счисления
Ответы (1)
7. Под основанием системы счисления понимают: a) количество используемых знаков в алфавите системы счисления; b) наибольшую цифру в алфавите системы счисления; c) название системы счисления;
Ответы (1)