Предмет: Информатика,
автор: filippov1915
ввести с клавиатуры 2 разных целых числа. Найти меньшее из них.
Результат вывести на экран.
VBA
Ответы
Автор ответа:
0
Sub aaa()
a = CDbl(InputBox("первое число"))
b = CDbl(InputBox("второе число"))
MsgBox "минимум двух чисел " + CStr(IIf(a > b, b, a))
End Sub
a = CDbl(InputBox("первое число"))
b = CDbl(InputBox("второе число"))
MsgBox "минимум двух чисел " + CStr(IIf(a > b, b, a))
End Sub
Интересные вопросы
Предмет: Другие предметы,
автор: momo12345mlp
Предмет: Қазақ тiлi,
автор: soyenarachka
Предмет: Физика,
автор: veselchakto03
Предмет: Математика,
автор: ivangoludin