Нахождение гипотенузы и катетов с корнями - 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

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

6   голосов , оценка 4.167 из 5