Als onderdeel van een programma , soms moet je de hoek berekenen tussen twee punten . U gebruikt driehoeksmeting om de berekeningen te doen . Omdat trigonometrie is gebaseerd op rechthoekige driehoeken , behandel je de twee punten als de hoeken van een rechthoekige driehoek , en uw berekeningen te baseren op de driehoek . QBasic is een programmeertaal voor MS - DOS . Het is gebaseerd op BASIC , van waaruit het dankt zijn trigonometriefuncties . U kunt de hoek berekenen tussen twee punten in QBasic via een van deze functies , ATN . Instructies 1 Zoek de horizontale en verticale afstand tussen de twee punten . Deze afstanden vormen de zijden van de driehoek die u gebruikt voor uw berekeningen . Voor dit voorbeeld , worden de coördinaten van de twee punten opgeslagen in variabelen genoemd Point1X , Point1Y , Point2X en Point2Y . Om elke afstand vinden , aftrekken van het eerste punt van de coördinaat van het tweede punt van de matching coördinaat : DIM TriangleWidth AS SINGLE , TriangleHeight ALS ENIGE TriangleWidth = Point2X - Point1X TriangleHeight = Point2Y - Point1Y kopen van 2 Zet beide afstanden positieve getallen . TriangleWidth zal negatief zijn als het tweede punt is aan de linkerkant van het eerste punt , en TriangleHeight zal negatief zijn als het tweede punt is onder het eerste punt . Dit is een probleem omdat je positieve getallen voor de berekeningen nodig . Gebruik de ABS -functie om de absolute waarde van elke afstand vindt : TriangleWidth = ABS ( TriangleWidth ) TriangleHeight = ABS ( TriangleHeight ) 3 Bereken de tangens van de hoek . De tangens van een hoek is de lengte van de zijde tegenover de hoek gedeeld door de lengte van de zijde grenzend aan de hoek . Je probeert de hoek te vinden vanaf het eerste punt, dat de hoogte van de driehoek betekent is de andere kant en zijn basis is de aangrenzende kant. Verdeel de hoogte van de basis : DIM Tangent ALS ENIGE Tangent = TriangleHeight /TriangleWidth 4 Bereken de hoek met de ATN -functie . De ATN -functie ( kort voor " arctangens " ) vindt de hoek die overeenkomt met een tangent : DIM Hoek ALS ENIGE Hoek = ATN ( Tangent ) 5 zetten de hoek van radialen naar graden . De ATN functie geeft een hoek in radialen . ( Pi radialen gelijk een halve cirkel , of 180 graden . ) Om radialen om te zetten in graden , vermenigvuldigen met 180 en delen door pi : Hoek = Hoek * 180 /3,14159 < br >
|