Elektroda.pl
Elektroda.pl
X
Proszę, dodaj wyjątek www.elektroda.pl do Adblock.
Dzięki temu, że oglądasz reklamy, wspierasz portal i użytkowników.

[delphi] konwersja tangensa kata na stopnie lub radiany

Integers 02 Wrz 2010 17:23 2954 3
  • #1 02 Wrz 2010 17:23
    Integers
    Poziom 13  

    Witam.

    Głupia sprawa ... mam proste, wyliczyłem tangensa aby dowiedzieć się jaki jest kat między nimi i pogrom..
    jak w Delphi zamienić tangensa na kąt w stopniach?
    tablice odpadają bo muszę mieć dużą dokładność do kilku miejsc po przecinku

    mam

    Code:

      S:= '  tng= '+FloatToStr(Kat1)+'  kąt= '+FloatToStr( arctan(Kat1) );


    co daje mi:
    Code:
    ok 70 st
    
     A 501,249
     C 548,121
      tng= 2,62880373049561  kąt= 1,20729881795848
    ok 200 st
     A 501,249
     C 177,290
      tng=0,114780604588008  kąt= 0,114280489599597


    sprawdzałem, tangens 2,6288.. daje prawie 70stopni, ni jak sie ma do tego kąt = 1,20729881795848.

    Pozdrawiam.[/quote]

    0 3
  • #2 02 Wrz 2010 17:53
    Jaca
    Poziom 28  

    Code:
    DegToRad()
    
    RadToDeg()


    ps. Do uses dodaj Math

    0
  • #3 02 Wrz 2010 18:11
    arnoldziq
    Moderator Programowanie

    Przepuść ten wynik przez funkcję : RadToDEG z modułu Math.

    0
  • #4 02 Wrz 2010 18:16
    Integers
    Poziom 13  

    dzięki, działa wyśmienicie. trochę wstyd ale cóż niektóre wiadomości ulatują.

    0