Oppure

Loading
22/02/11 14:59
GiuZeppelin
Salve ragazzi, non riesco a fa eseguire la funzione trigonometrica della tangente^-1
alla calcolatrice che sto programmando. Ho letto che esprime il risultato in radianti e a me servirebbe in Gradi quindi ho provato a moltiplicare il risultato della funzione System.math.atan per PiGreco/180 che funziona per le funzioni Seno, coseno, tangente ma non quando sono elevate alla -1


Private Sub Button27_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button27.Click
        
        Dim PG,  atan, val As Double
        val = CDbl(TxtVal.text)
        PG = (3.14159265358979)
        atan = System.Math.Atan(val * (PG / 180))
        TxtAtan.Text = atan
    End Sub



in cosa sbaglio?
Ultima modifica effettuata da GiuZeppelin 22/02/11 15:01
aaa
22/02/11 21:51
TheKaneB
argh... non è tangente "elevato alla -1" (che sarebbe 1 / tan, nota anche come cotangente ), ma trattasi di arcotangente, cioè una cosa completamente diversa ( è la funzione "inversa" della tangente).

Dal momento che la tangente prende un angolo e sputa fuori un numero reale, la sua inversa prenderà un numero reale e sputerà fuori un angolo.

Il tuo problema non è nella programmazione ma nella matematica che sta dietro al tuo programma :P
aaa