FANDOM


Declaración implícita Editar

Option Explicit Off

Module Module1

  Sub Main()

    cateto1 = 10
    cateto2 = 20
    hipotenusa = Math.Sqrt(cateto1 ^ 2 + cateto2 ^ 2)

    Console.WriteLine(hipotenusa)
    Console.ReadLine()

  End Sub

End Module

Declaración explícita Editar

Option Explicit On

Module Module1

  Sub Main()

    Dim cateto1 As Byte
    Dim cateto2 As Byte
    Dim hipotenusa As Single

    cateto1 = 10
    cateto2 = 20
    hipotenusa = Math.Sqrt(cateto1 ^ 2 + cateto2 ^ 2)

    Console.WriteLine(hipotenusa)
    Console.ReadLine()

  End Sub

End Module

Indicadores de tipo Editar

Option Explicit Off

Module Module1

  Sub Main()

    cateto1 = 10S
    cateto2 = 20S
    hipotenusa = Math.Sqrt(cateto1 ^ 2 + cateto2 ^ 2)

    Console.WriteLine(hipotenusa)
    Console.ReadLine()

  End Sub

End Module