25. januar 2006 - 02:15Der er
6 kommentarer og 1 løsning
Invers sinus, hvordan laver man det i VBscript?
Jeg kan ikke umiddelbart finde nogen funktion til den inverse sinus, eksisterer der overhovedet en sådan funktion i vbscript, eller skal man selv støbe den sammen ? Hvis man selv skal, hvordan er det så lige man regner den inverse sinus, så skal jeg nok selv lave koden.
Teknologi, AI og forretning er i centrum på Computerworlds Cloud og AI Festival i København d. 18. og 19. september. Se hele programmet for den store konference om strategisk brug af Cloud og AI på: www.cloud-festival.dk
Det hedder for resten ofte Arcsin på engelsk, og vinklerne i VBS måles i radianer. For at omregne grader til radianer, så gang grad med pi/180, og fra radianer til grader, gang radian med 180/pi. Husk at passe på division med nul, når sinus = 1! ;-)
Jeps, og jeg kunne ikke dy mig for at lave en funktion selv:
function Arcsin (x) if 1 <> Abs(x) then 'forhindre div med 0 Arcsin = Atn(x / Sqr(-x * x + 1)) else Arcsin = 1.5707963267949 * x 'for at få det rette fortegn end if end function
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.