Red de conocimiento informático - Problemas con los teléfonos móviles - Programación VB Ingrese las longitudes de los tres lados del triángulo, los valores de a, b y c. En función de sus valores, determine si se forma un triángulo.

Programación VB Ingrese las longitudes de los tres lados del triángulo, los valores de a, b y c. En función de sus valores, determine si se forma un triángulo.

a = Val(inputbox("Entrada a"))

b = Val(inputbox("Entrada b"))

c = Val(inputbox ("Input c"))

Si a b gt; c And b cgt; a And c b Entonces

'puede formar

Si a= b Y b=c Entonces

Msgbox "Triángulo isósceles"

ElseIf a=b Or b=c O a=c Entonces

Msgbox "Triángulo isósceles" Triángulo"

De lo contrario, si a^2 b^2 = c^2 o a^2 c^2 = b^2 o c^2 b^2 = a^2 entonces

Msgbox "Triángulo general"

end if

Else

Msgbox "No se puede formar un triángulo"

end if