Написать программу перевода из битов в байты, килобайты, мегабайты и обратно

@azazellka666 · Регистрация: 04.05.2011

Author24 — интернет-сервис помощи студентам

написать программу перевода из битов в байты, килобайты, мегабайты и обратно!

SoftIce · 22.12.2011, 18:09

Вот посмотри
Ой,блин, это не то, извини пожалуйста, ошибся.

SoftIce · 22.12.2011, 18:39

Вот, наверное, правильно

@Skriptik · 24.12.2011, 03:39

Вот такая прога переводит байт в бит, мегабат в килобайт, килобит в килобайты.

Вот код

Visual Basic

Dim b As Double
Dim rez As Double
Dim n As Double
 
Private Sub гиг_Click()
b = Val(Text1.Text)
Label1.Caption = "Мегабайт"
rez = b * 1024
Label3.Caption = "Килобайт"
Label4.Caption = rez
End Sub
 
Private Sub Килобит_килобайт_Click()
b = Val(Text1.Text)
Label1.Caption = "Килобит"
rez = b / 8
Label3.Caption = "Килобайт"
Label4.Caption = rez
End Sub
 
Private Sub Мега_Click()
b = Val(Text1.Text)
Label1.Caption = "Байт"
rez = b * 8
Label3.Caption = "Бит"
Label4.Caption = rez
End Sub

Комментарий модератора

Используйте специальные теги форматирования программного кода
"стучать в Асю" не нужно, решаем здесь

@Skriptik · 28.12.2011, 22:38

Спасибо я понял.

@azazellka666 0 / 0 / 0 Регистрация: 04.05.2011 Сообщений: 33
		1
	Написать программу перевода из битов в байты, килобайты, мегабайты и обратно 22.12.2011, 16:46. Показов 11491. Ответов 4 Метки нет (Все метки) написать программу перевода из битов в байты, килобайты, мегабайты и обратно! 0

@Skriptik -26 / 6 / 1 Регистрация: 26.06.2011 Сообщений: 157
	28.12.2011, 22:38	5
	Спасибо я понял. 0