Problema - Nivel 3

Problema

Num formulário, crie uma textbox para introduzir um número e outra para introduzir outro, bem como labels a identificar cada uma delas ("Lado 1" e "Hipotenusa", respectivamente). Em seguida, crie uma outra textbox chamada "Lado em falta" e um botão chamando descobrir.
A sua função será criar um código que demonstre o valor de um lado de um triângulo (na textbox "Lado em falta"), dado o valor da sua hipotenusa (textbox "Hipotenusa") e um dos seus outros lados ("Lado 1").

Dica: Utilize o teorema de Pitágoras:


Obs: Para realizar a raiz quadrada de um numero utilize Math.Sqrt(numero).

Exemplo:

Lado 1 = 4
Hipotenusa = 15


Resultado:
Lado em falta = 1,8729(...)

Resolução

Public Class Form1

    Private Sub Calcular_Click(sender As Object, e As EventArgs) Handles Descobrir.Click

        Dim lado1 As Integer = Convert.ToInt32(TextBoxLado1.Text)
        Dim hipotenusa As Integer = Convert.ToInt32(TextBoxHipotenusa.Text)

        Dim numeroEmFalta As Double

        ' a = Lado1 / b = LadoEmFalta / c = Hipotenusa
        ' a^2 + b^2 = c^2 <=> raiza a + raiz b = raiz c <=> raiz b = raiz c - raiz a
        numeroEmFalta = Math.Sqrt(hipotenusa) - Math.Sqrt(lado1)

        LadoEmFalta.Text = Convert.ToString(numeroEmFalta)
    End Sub

End Class

Formulário