2. Fórumok
  3. Szoftverfejlesztés
  4. Programozás topic
  5. (kiemelt téma)

Új hozzászólás Aktív témák

  • #2536 VladimirR nagyúr vamzi #2533
    Új Válasz #2536
    Új hozzászólás
    Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

    VladimirR

    nagyúr

    válasz vamzi #2533 üzenetére

    a unit az gyakorlatilag egy fuggvenykonyvtar (vagy minek hijjak), abban mindenfele fuggvenyek, eljarasok vannak
    programozasi tanulmanyaid mar egeszen biztos talalkoztal unit-okkal, ha massal nem, akkor a crt, vagy meginkabb a system unit-tal
    ahhoz, hogy a bennuk levo eljarasokat, fuggvenyeket hasznalni tudd, ezeket a unit-okat ''be kell hivni'' a kodba, amire a uses kulcsszo (vagymi) hasznal (system unit eseteben ez nem szukseges, az alapbol bennefoglaltatik)
    az olyan fuggvenyek, eljarasok, mint peldaul az inc, dec, val, round, write, writeln, read, readln mind a system unit-ban vannak, de pl a crt unit legismertebb fuggvenyevel, a clrscr-rel is egeszen biztos talalkoztal mar
    ahhoz, hogy egy clrscr-t hasznalni tudj, a program elejen be kell irnod, hogy uses crt;
    ugyanigy, hogy a fenti mathcvt.tpu unit-ot hasznalni tudd, meg kell azt hivnod a kovetkezo modon: uses mathcvt
    ezutan elerhetove valnak a kovetkezo fuggvenyek:
    Function Power(X,Y:WORD):LongInt;         - hatvanyozas
    Function Bin2Dec(Bin:String):LongInt;         2-esbol 10-esbe
    Function Bin2Hex(Bin:String):String;         - 2-esbol 16-osba
    Function Dec2Bin(Dec:LongInt):String;         - 10-esbol 2-esbe
    Function Dec2Hex(Dec:LongInt):String;         - 10-esbol 16-osba
    Function Hex2Bin(Hex:String):String;         - 16-osbol 2-esbe
    Function Hex2Dec(Hex:String):LongInt;         - 16-osbol 10-esbe
    Function Oct2Dec(Oct:String):LongInt;         - 8-asbol 10-esbe
    Function Dec2Oct(Dec:LongInt):String;         - 10-esbol 8-asba

    az elso fuggveny-nek ket parametert adsz meg, x a hatvanyalap, y a hatvany foka - a visszateresi ertek x^y lesz
    a tobb fuggveny egy bemeno parametert kap (ami 10-esbol konvertalasnal longint, egyebkent string), s a megfelelo szamrendszerben levo ertekkel ter vissza (tizesbe konvertalasnal longint, egyebkent string)

    tehat:

    uses mathcvt;

    begin
        wrinteln( dec2hex( 255 ) );
        wrinteln( dec2hex( 'FF' ) );
    end.

    ez ket sort fog kiirni, az elsoben FF lesz (ez a 255 16-os szamrendszerben), a masodikban pedig 255 (ez az FF 10-es szamrendszerben)

    [Szerkesztve]

Új hozzászólás Aktív témák