Даны действительные числа a, b ,c. Выяснить, существует ли треугольник с длинами сторон a,b,c. (В Visual Basic) Помогиитее! Пробовала так:
Private Sub CommandButton1_Click()
Dim a, b, c As Single
If (a < b + c) Then Yes
If b < a + c Then Yes
If c < a + b Then Yes
Но не знаю как закончить
Пожалуйста! — Правильный ответ на вопрос найдете ниже

Ответ: Private Sub CommandButton1_Click()Dim a, b, c As Singlea = Val(InputBox(«a =»))b = Val(InputBox(«b =»))c = Val(InputBox(«c =»))tr = TrueIf a < b + c Then tr = FalseIf b < a + c Then tr = FalseIf c < a + b Then tr = FalseIf Not tr ThenEnd IfMsgBox «Такого треугольника не существует»End Sub

Ответ: так неверно будет?

Ответ: Вы попросили фрагмент программы — я написал. Комментарий служит только для уточнения ответа, а не для дополнительных вопросов.

Ответ: спасибо)