Asteet ja radiaanit

deldelphi

Miten pascalissa ja siis delphillä saan laskettua kolmion kulmien asteet?
Ongelmana on, että saan kyllä jotain laskettua (arvo suurempi kuin nolla ja pienempi kuin 1),mutta se ei suostu millään muuttumaan asteiksi, vaan tulos jää aina nollan ja ykkösen väliin.
siis nyt se on mulla muotoa: aste := tan(x);
aste ja x ovat double muotoa.
???

3

821

Äänestä

    Vastaukset 3

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • dlp

      rad:=aste*pi/180;
      x := tan(rad);
      tan-funktion argumentti on radiaaneja.

      käänteinen laskutoimitus
      aste := 180*arctan(x)/pi;

    • tälleen

      angle := 180.0*atan(x)/Pi

      Huomaa siis että funktio on atan(), ei tan(), joka palauttaa radiaaneina kulman jonka tangentti on x (siis esim a/b). Sitten vaan kerrotaan 180.0/Pi:llä niin saadaan asteiksi.

      • tälleen

        Ei pitäis mietiskellä noin kauan !

        No, päädyttiin kuitenkin samaa lopputulokseen ;-)

    Ketjusta on poistettu 0 sääntöjenvastaista viestiä.

    Takaisin ylös

    Luetuimmat keskustelut

    1. Ampuminen kylpylässä

      Onko vornasen timbe käynyt hiukan kylpemässä vai mikä tämä ampumatapaus on kylpylässä? Tuntuu aika villi meno olevan naa
      Naantali
      74
      1670

    2. Naantalin kylpylän ampujat

      Oli somppumatuja. Nyt mennään. Suomi on ruotsi.
      Maailman menoa
      23
      1172

    3. Kemijärvellä vesionnettomuus

      Pitkänsillan ja taiteilijanniemen välillä nähty henkilön painuvan veden alle. Mitä on tapahtunut? Onko vesihiisi taas as
      Kemijärvi
      32
      1073

    4. Hei, voitko kuunnella

      Voisitko auttaa minua selvittämään asioita? En halua ajaa sinua hulluuteen kanssani, en sitoa sinua, en esittää vaatimu
      Ikävä
      134
      906

    5. Joku porukka lähtenyt täältä

      Ihmeen hiljainen on palsta nyt. Yleensä tänne tulvii aloituksia yms, mutta nyt on kyllä erikoisen hiljaista.
      Ikävä
      189
      826

    6. Miten yrität

      Vielä saada kaivattusi?
      Ikävä
      64
      694

    7. Olipa yllätys

      Kuten hyvin moni tiesi/arvasi että valetta alusta loppuun toi *olemme ystäviä* satu. Instassaan käsi kädessä kuva kertoo
      Kotimaiset julkkisjuorut
      192
      619

    8. On todella ikävää

      Todella ikävää, että asiat ovat menneet tällaisiksi. Tämä ei ollut missään vaiheessa tarkoitukseni. Olen tehnyt virheit
      Ikävä
      79
      598

    9. Tuletko tänään

      Jos soitan? Niin... tuletko?🖤
      Ikävä
      49
      561

    10. Mitä kirjainta kaipaat?

      L.
      Ikävä
      71
      557

    11. Se kun olit pitkästä aikaa silmieni edessä

      Oli kyllä sykähdyttävää. Tiedätkö, mikä laittaa minut ikävöimään sinua? Kun palautan mieleeni valtavan ihanan olemuksen,
      Ikävä
      32
      518

    12. Ottanet yhteyttä

      Facebookissa,jos on jotain asiaa.Miehelle! T.M-nainen.
      Ikävä
      55
      507

    13. Muutto auto hakee sut tänään!

      Tein sulle oman huoneen! mieheltä naiselle
      Ikävä
      57
      485

    14. Oletteko koskaan torjuneet kaivattuanne?

      Minä olen, kun en silloin tajunnut vielä ihastuneeni. Yritin paikata tapahtunutta, mutta ei onnistunut enää.
      Ikävä
      25
      457

    15. Kai sä mies ymmärrät..

      ..ettet jättänyt vaihtoahtoa. Tottakai toivon vielä, että pystyisit toimimaan niin että asiat korjaantuisivat. Vahvast
      Ikävä
      28
      432

    16. Minä vuonna olet syntynyt?

      😊
      Ikävä
      34
      424

    17. En tiedä mitä sanoa

      Siksi en vastannut😔
      Ikävä
      33
      423

    18. Jos kaivattusi olisi

      Vieressäsi niin mitä tekisit?
      Ikävä
      40
      417

    19. Kiinni jäit

      Ei olisi uskonut sinusta
      Ikävä
      16
      409

    20. Päivän galluppi

      Minkälainen ehkäisy sinkkupalstalaisilla käytössä?
      Sinkut
      82
      398
    Aihe
    TietosuojaselosteKäyttöehdotEvästeasetuksetSäännöt