Дано натуральное трехзначное число.Определить цифры этого числа (K, L, M)-Visual Basic - VB
Формулировка задачи:
Дано натуральное трехзначное число. Определить цифры этого числа (K, L, M) и выяснить, можно ли построить произвольный треугольник K, L, M.
Пожалуйста!!
Решение задачи: «Дано натуральное трехзначное число.Определить цифры этого числа (K, L, M)-Visual Basic»
textual
Листинг программы
Private Sub Form_Load() Dim s As String, K As Integer, L As Integer, M As Integer s = InputBox("Input Number") K = Val(Mid$(s, 1, 1)) L = Val(Mid$(s, 2, 1)) M = Val(Mid$(s, 3, 1)) If (K < L + M) And (L < K + M) And (M < K + L) Then MsgBox "Yes, triangle exists!" Else MsgBox "No triangle (" End If End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д