ПР. Проект «Двоичные числа».

1.      Запустите MS Visual Studio.

2.      Создайте новый проект.

3.      Поместите на форму:

4.      Программа:

Public Class Form1     Dim num As Integer

    Private Sub Button1_Click...         ListBox1.Items.Clear()         num = Val(TextBox1.Text)         Do While num > 0

            If (num Mod 2 = 0) Then

                ListBox1.Items.Add(0)

            Else

                ListBox1.Items.Add(1)             End If             num = num / 2

        Loop     End Sub End Class

5.    Сохраните в папке «Мои программы»