Три разных целых положительных числа: найти сумму двух наименьших из них - VB
Формулировка задачи:
Напишите программу, запрашивающую три разных целых положительных числа и находящую сумму двух наименьших из них.
Решение задачи: «Три разных целых положительных числа: найти сумму двух наименьших из них»
textual
Листинг программы
Dim a, b, c, d As Integer a = InputBox("") b = InputBox("") c = InputBox("") If a > b And a > c Then d = Int(b) + Int(c) End If If b > a And b > c Then d = Int(a) + Int(c) End If If c > a And c > b Then d = Int(a) + Int(b) End If MsgBox d
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д