Дано натуральное трехзначное число.Определить цифры этого числа (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

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

10   голосов , оценка 4 из 5
Похожие ответы