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

761

    Vastaukset

    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ä.

    Luetuimmat keskustelut

    1. Hengenvaaralliset kiihdytysajot päättyivät karmealla tavalla, kilpailija kuoli

      Onnettomuudesta on aloitettu selvitys. Tapahtuma keskeytettiin onnettomuuteen. Tapahtumaa tutkitaan paikan päällä yhtei
      Kauhava
      204
      7175
    2. Ootko rakastunut?

      Kerro pois nyt
      Ikävä
      163
      2170
    3. Onhan sulla nainen parempi mieli

      Nyt? Ainakin toivon niin.
      Ikävä
      113
      1758
    4. Ujosteletko tosissaan vai mitä oikeen

      Himmailet???? Mitä pelkäät?????
      Ikävä
      51
      1440
    5. Suureksi onneksesi on myönnettävä

      Että olen nyt sitten mennyt rakastumaan sinuun. Ei tässä mitään, olen kärsivällinen ❤️
      Ikävä
      65
      1393
    6. Möykkähulluus vaati kuolonuhrin

      Nuori elämä menettiin täysin turhaan tällä järjettömyydellä! Toivottavasti näitä ei enää koskaan nähdä Kauhavalla! 😢
      Kauhava
      57
      1196
    7. Älä mies pidä mua pettäjänä

      En petä ketään. Älä mies ajattele niin. Anteeksi että ihastuin suhun varattuna. Pettänyt en ole koskaan ketään vaikka hu
      Ikävä
      102
      1135
    8. Reeniähororeeniä

      Helvetillisen vaikeaa työskennellä hoitajana,kun ei kestä silmissään yhtään läskiä. Saati hoitaa sellaista. Mitä tehdä?
      Kouvola
      7
      1076
    9. Kävit nainen näemmä mun

      Facessa katsomassa....
      Ikävä
      41
      1029
    10. Tarvitsemme lisää maahanmuuttoa.

      Väestö eläköityy, eli tarvitsemme lisää tekeviä käsiä ja veronmaksajia. Ainut ratkaisu löytyy maahanmuutosta. Nimenomaan
      Maailman menoa
      259
      1003
    Aihe