logo elektroda
logo elektroda
X
logo elektroda
REKLAMA
REKLAMA
Adblock/uBlockOrigin/AdGuard mogą powodować znikanie niektórych postów z powodu nowej reguły.

Jak poprawnie zamienić RAD na DEG w Delphi przy obliczaniu cosinusa?

cyberdar 13 Kwi 2004 16:54 1470 5
REKLAMA
  • #1 592925
    cyberdar
    Poziom 31  
    Posty: 1465
    Pomógł: 161
    Ocena: 73
    Chcę obliczyć: cos(6). Wynik dostaję poprawny ale w RAD. W Delphi jest procedura zamiany z RAD na DEG ale to mi nie chce działać. Pokazują mi się jakieś bzdury. Może coś źle robię. Poniżej procedura:

    procedure TFORM1.......
    begin
    kosinus:=StrToFloat(Panel1.Caption);
    Panel1.Caption:=FloatToStr(cos(kosinus));
    end;


    Program odczytuje to co jest w danej chwili wyświetlone w panelu, konwertuje na liczbę i przypisuje do zmiennej kosinus. W następnej linii oblicza cosinus zamienia go na string i wyświetla w panelu. Niby proste ale nie działa mi to.

    z góry dzięki za pomoc. Pozdrawiam.
  • REKLAMA
  • #2 592979
    elektryk
    Poziom 42  
    Posty: 11029
    Pomógł: 439
    Ocena: 241
    Te procedury zamieniają objekt String na objekt (zmienną typu) float, a co do zamiany stopni na radiany to polecam książki do matematyki z gimnazjum.
  • REKLAMA
  • #3 593567
    cyberdar
    Poziom 31  
    Posty: 1465
    Pomógł: 161
    Ocena: 73
    Elektryk filozof z Ciebie albo nabijacz punktów. Sprawdziłem funkcję i wzór. Bez efektów. Dla ciekawości w jednej z książek do Delphi 3 (w tym akurat piszę) napisane jest, że cos(6) to 0.99452 ale nijak to nie wychodzi w Delphi 3. Więc jeśli ktoś się z tym spotkał niech się podzieli uwagami a nie filozofuje
  • REKLAMA
  • #4 593633
    Smiglo
    Poziom 1  
    Posty: 1
    Żaden filozof ani nabijacz - napisał Ci w czym problem.

    Delphi syntax:
    function Cos(X: Extended): Extended;

    Description
    In Delphi code, Cos returns the cosine of the angle X.
    X is a real-type expression that represents an angle in radians.


    Takie coś jest w helpie Delphiego na temat funkcji cos.
    Można sie z tego dowiedzieć, że funkcja cos zwraca cosinus kąta podanego w radianach (a nie w stopniach).
    Na przykład kąt 90 stopni to jest pi/2 w radianach (około 1,5708)

    A najlepiej to weź sobie jakieś tablice matematyczne lub książke z matematyki...
  • REKLAMA
  • #5 594087
    Pocieszny
    Poziom 38  
    Posty: 5220
    Pomógł: 229
    Ocena: 263
    Racja. Funkcje trygonometryczne mają argumenty w radianach a nie stopniach.

    Możesz zajrzeć do HELP. Coś tam jest o tym napisane.
  • #6 594373
    cyberdar
    Poziom 31  
    Posty: 1465
    Pomógł: 161
    Ocena: 73
    Już się wszystko wyjaśniło. Dzięki za pomoc. Dzięki Marek.
REKLAMA