Министерство образования Республики
Таджикистан
Таджикский Технический Университет
им. ак. М. С. Осими
кафедра АСОИиУ
Лабораторная работа №2
«Сложение и вычитание целых неотрицательных чисел в
двоичном коде»
Выполнил:
Принял:
-Душанбе 2009-
Программа «Plusdouble»
Option Explicit
Public sel As Integer
Public i, x, j, x0 As Double
Public c As Integer
Окно приложения в исходном состоянии.
Private
Sub Command1_Click()
fir.Text = ""
sec.Text = ""
res.Text = ""
x = 0
j =
0 Процедура
очистки полей формы
x0 = 0
i = 0
End Sub
Private Sub ext_Click()
End
Процедура выхода
End Sub
Private
Sub fir_Change()
If val(fir.Text) = 0 Or val(fir.Text) = 1
Then
lb1.Caption = fir.Text
Exit Sub
Else
i = (Len(fir.Text))
x = 0
j = 0
Do
Процедура для перевода
x = x + (val(Mid(fir.Text, i, 1)) * (2 ^ j))
введённого значения
i = i –
1
в десятичный код
j = j + 1
Loop Until i = 0
lb1.Caption = x
End If
End Sub
Private Sub fir_GotFocus()
sel = 1
End Sub
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
On Error GoTo err:
If (KeyCode = vbKeyBack) Then
Select Case sel
Case 1
fir.Text = Left(fir.Text, Len(fir.Text) -
1)
Case 2
sec.Text = Left(sec.Text, Len(sec.Text) -
1)
End Select
Else
End If
Exit Sub
err:
Beep
End Sub
Private Sub Form_KeyPress(KeyAscii As
Integer)
Dim val As String
val = Chr(KeyAscii)
If (val >= "0") And (val <=
"9") Then
If sel = 1 Then
Select Case val
Case "0"
fir.Text = fir.Text & "0"
Case
"1"
Процедуры
fir.Text = fir.Text &
"1"
контроля за
End Select
вводом
ElseIf sel = 2 Then
Select Case val
Case "0"
sec.Text = sec.Text & "0"
Case "1"
sec.Text = sec.Text & "1"
End Select
Else
End If
Else
End If
End Sub
Private Sub Form_Load()
plus.Value = True
c = 1
End Sub
Форма с введёнными значениями
Private Sub res_Change()
If val(res.Text) = 0 Or val(res.Text) = 1
Then
lb3.Caption = res.Text
Exit Sub
Else
i = (Len(res.Text))
x = 0
j = 0
Do
x = x + (val(Mid(res.Text, i, 1)) * (2 ^
j))
i = i - 1
j = j + 1
Loop Until i = 0
lb3.Caption = x
End If
End Sub
Private Sub res_GotFocus()
sel = 3
End Sub
Private Sub run_Click()
Dim d(90) As Integer
If fir.Text = "" Or sec.Text =
"" Then
MsgBox "Incorrect input. Please input
numbers again", , "=VaMp1r3=™"
Exit Sub
Else
Select Case plus.Value
Case True
x0 = ((CInt(lb1.Caption)) +
(CInt(lb2.Caption)))
x = 0
c = 1
Do
d(c) = x0 Mod 2
x = Round((CDbl(x0) / 2) - 0.3, 0)
c = c + 1
x0 = x
Loop Until x = 1
d(c) = x
res.Text = ""
Do
res.Text = res.Text & d(c)
c = c - 1
Loop Until c = 0
Case False
If val(lb2.Caption) > val(lb1.Caption)
Then
MsgBox "Так нельзя! Первое слагаемое
должно быть больше второго. , "=VaMP1r3=™"
Exit Sub
Else
x0 = ((CInt(lb1.Caption)) -
(CInt(lb2.Caption)))
x = 0
c = 1
Do
If x0 = 0 Then Exit Do
d(c) = x0 Mod 2
x = Round((CDbl(x0) / 2) - 0.3, 0)
c = c + 1
x0 = x
Loop Until x = 1
d(c) = x
res.Text = ""
Do
res.Text = res.Text & d(c)
c = c - 1
Loop Until c = 0
End If
End Select
End If
End Sub
Форма с вычисленными данными
Private Sub sec_Change()
If val(sec.Text) = 0 Or val(sec.Text) = 1
Then
lb2.Caption = sec.Text
Exit Sub
Else
i = (Len(sec.Text))
x = 0
j = 0
Do
x = x + (val(Mid(sec.Text, i, 1)) * (2 ^
j))
i = i - 1
j = j + 1
Loop Until i = 0
lb2.Caption = x
End If
End Sub
Private Sub sec_GotFocus()
sel = 2
End Sub
Другие работы по теме:
работа по дисциплине «Моделирование»
Провести анализ заданной схемы на предмет корректности её работы в установленных режимах. Внести необходимые исправления в схему, для обеспечения правильности её работы
“Последовательный сумматор.”
В данной курсовой работе представлены теоретические сведения о сумматорах и их классификации. Подробно разобран последовательный сумматор и принцип его работы
Счетчики
Это устройства предназначенные для подсчета числа сигналов, поступающих на его вход и фиксация этого числа в виде кода хранящегося в триггерах.
Трюк с биномиальными коэффициентами
С биномиальными коэффициентами проще иметь дело, когда их аргументами являются целые неотрицательные числа, однако возможны и полезны и более общие рассуждения.
Китайская система счисления
1. Структура системы счисления Китая. Одна из древнейших систем счисления была создана в Китае, а также в Японии. Эта система возникла как результат оперирования с палочками, выкладываемыми для счета на стол или доску. Числа от единицы до пяти обозначались, соответственно, одной, двумя и т.д. палочками, выкладываемыми вертикально, а одна, две, три или четыре вертикальные палочки, над которыми помещалась одна поперечная палочка, означали числа шесть, семь, восемь и девять. (Смотреть таблицу обозначений чисел.)
Краткое доказательство гипотезы Биля
Гипотеза Биля как неопределенное уравнение, не имеющее решения в целых положительных числах. Использование метода замены переменных. Запись уравнения в соответствии с известной зависимостью для разности квадратов двух чисел. Наличие дробных чисел.
Краткое доказательство гипотезы Билля
Формулировка гипотезы Билля и методика ее краткого доказательства. Анализ составляющих гипотезу алгебраических выражений. Использование метода замены переменных при доказательстве гипотезы Билля, не имеющей решения при целых положительных числах.
Сложение и вычитание десятичных дробей
Text Graphics СЛОЖЕНИЕ и ВЫЧИТАНИЕ ДЕСЯТИЧНЫХ ДРОБЕЙ Graphics СЛОЖЕНИЕ и ВЫЧИТАНИЕ ДЕСЯТИЧНЫХ ДРОБЕЙ: уравняйте в дробях количество знаков после запятой; запишите дроби друг под другом так, чтобы запятая была под запятой; выполните сложение (вычитание), не обращая внимание на запятую; поставьте в ответе запятую под запятой Graphics
Краткое доказательство гипотезы Билля
Гипотеза Билля формулируется следующим образом: неопределенное уравнение: не имеет решения в целых положительных числах А, В, С, при условии, что больше 2.
Деление двоичных чисел
Если умножение выполняется путем многократных сдвигов и сложений, то деление, будучи операцией обратной умножению,— путем многократных сдвигов и вычитаний.
Цифровые компараторы
Принцип действия цифрового компаратора. Фиксация входного напряжения на уровнях, совместимых с логическими уровнями транзисторно-логических микросхем. Схема компаратора на операционном усилителе. Структура логического элемента одноразрядного компаратора.
Тест по Радиоэлектронники
1. Допустимое отклонение напряжения питания ТТЛ микросхем: D) ±5%; 2. На вход элемента дизъюнкции подается 1 и 0, что будет на выходе: E) 1; 3. Формула дистрибутивного закона:
Арифметические устройства
Правила двоичного сложения. Таблица и схема истинности полусумматора и полного сумматора. Таблица, стуктурная и логическая схема истинности для полувычитателя и полного вычитателя. Использование сумматоров для вычитания. Работа суммирующего устройства.
Построение ОВС для решения формулы
Выбор и обоснование параметров варианта. Структура вычислительного процесса алгоритмы вычисления. Последовательность обработки операндов. Обозначения на схемах ОВС, временные диаграммы. Программирование ОВС, коды команд ОЭ. Схема цепей программирования.
Лабораторная работа №11
Цель работы: Изучение правил и получение навыков составления программ с использованием сложных типов данных массивов. Задание№ 17 . Из символов произвольного предложения сформировать массив целых чисел, соответствующих порядковому номеру литер в коде ASCII. Определить максимальный элемент этого порядка.
Лаба по информатике
Министерство общего и профессионального образования РФ Владимирский Государственный Университет Кафедра УИТЭС Лабораторная работа N2 ИЗУЧЕНИЕ ПРИНЦИПОВ ОРГАНИЗАЦИИ АРИФМЕТИКО-
Операции сложения и вычитания
Алгоритм выполнения операции сложения, вычитания. Сложение чисел в столбик. Проверка получившихся результатов, переведение их в другую систему счисления. Перевод числа 128 из 8-й в 10-ую систему счисления и числа 11011101 из 2-й в 10-ую систему счисления.
Вещественные числа. Способы представления и хранения в ЭВМ
Понятие и свойства вещественного числа. Изучение основных типов данных с плавающей точкой, принятых стандартов и их представление в современных ЭВМ. Наработка навыков обращения с вещественными числами на компьютере (запись, считывание, хранение).
Числовая и нечисловая обработка информации
Арифметические операции с целыми числами. Сложение и вычитание в дополнительном коде. Представление чисел в формате с плавающей точкой. Особенности выполнения арифметических операций в соответствии с IEEE. Точность выполнения арифметических операций.
Умножение и деление целых неотрицательных чисел в двоичном коде
Числа с фиксированной точкой характеризуются длиной слова в битах, положением двоичной точки, бывают беззнаковыми или знаковыми. Позиция двоичной точки определяет число разрядов в целой и дробной частях машинного слова. Представление отрицательного числа.
Тесты по информатике с ответами Вариант 6
1) Чему равен 1 Гбайт? 1. 210 Мбайт 2. 103 Мбайт 3. 1000 Мбайт 4. 1000 000 Кбайт 2) Процессор обрабатывает информацию… 1. в десятичной системе счисления 2. в двоичном коде
Манипулирование с целыми числами произвольной длины
Манипулировани с целыми числами произвольной длины Постановка задачи: Составить набор процедур манипулирования с целыми числами произвольной длины. Процедуры должны обеспечивать: формирование и ввод целых чисел произвольной длины, сложение, вычитание, сравнение и умножение целых чисел. Работоспособность процедур продемонстрировать на демонстрационной программе.
Построение ОВС для решения формулы
Содержание 1.1 Вычисление числа К 2 1.2 Выбор параметров варианта 2 2.1 Структура вычислительного процесса 5 2.2 Последовательность обработки операндов 5
Бэббидж Чарльз
В начале 19 века Чарльз Бэббидж сформулировал основные положения, которые должны лежать в основе конструкции вычислительной машины принципиально нового типа.