Предмет: Информатика,
автор: Tr1s
Написать программу в VBA, сравнивающую два числа, вводимые с клавиатуры.
Ответы
Автор ответа:
0
Sub car()
Dim s1, s2 As Double
s1 = CDbl(InputBox("Введи первое число", "Ввод данных", 88))
s2 = CDbl(InputBox("Введи второе число", "Ввод данных", 46))
If s1 > s2 Then MsgBox (CStr(s1) + ">" + CStr(s2)) Else MsgBox (CStr(s1) + "<" + CStr(s2))
End Sub
Dim s1, s2 As Double
s1 = CDbl(InputBox("Введи первое число", "Ввод данных", 88))
s2 = CDbl(InputBox("Введи второе число", "Ввод данных", 46))
If s1 > s2 Then MsgBox (CStr(s1) + ">" + CStr(s2)) Else MsgBox (CStr(s1) + "<" + CStr(s2))
End Sub
Похожие вопросы
Предмет: Геометрия,
автор: onetwo20
Предмет: История,
автор: hudoyberdievam56
Предмет: Химия,
автор: baskovmisa9
Предмет: Математика,
автор: LOKICF
Предмет: Алгебра,
автор: Ажарm