Keskustelu: Ohjelmointikysymykset: QB: Trigonometriaa... QB

Kuinka tehdä trigonometristen funktioiden vastalaskutoimitukset QB:ssä?

esim.

150tan = 0.2345678

(vastafunktio tan)0.2345678 = 150

Arkustangentin laskemiseen on QBasicissa funktio valmiiksi - ATN - mutta arkussini ja arkuskosini täytyy määritellä itse.

FUNCTION ASN! (l!)
   ASN! = ATN(l! / SQR(-l! * l! + 1))
END FUNCTION

FUNCTION ACS! (l!)
   ACS! = ATN(-l! / SQR(-l! * l! + 1)) + 2 * ATN(1)
END FUNCTION