Нахождение гипотенузы и катетов с корнями - Visual Basic .NET
Формулировка задачи:
Пишу программу для расчета гипотенузы и катетов прямоугольного треугольника. Столкнулся с проблемой, не знаю как посчитать если в заданных данных присутствует корень. Вот так выглядит программа. (Пустые TextBox это целое число, где "0" - это часть под корнем) Вот например нужно посчитать катет "a" зная гипотенузу и катет "b". У меня сделано вот так:
Но здесь получается что корень ноль и поэтому целая часть тоже обнуляется. Вопрос, как считать примеры с корнями в Visual Basic?
Решение задачи: «Нахождение гипотенузы и катетов с корнями»
textual
Листинг программы
If c.Text.Length <> 0 And b.Text.Length <> 0 And a.Text.Length = 0 Then a.Text = Math.Round(Math.Sqrt(Val(c.Text) ^ 2 * iif(Val(qc.Text)=0, 1 , Val(qc.Text)) - Val(b.Text) ^ 2 * iif(Val(qb.Text)=0, 1 , Val(qb.Text))), 2) End If
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д