EXP - Izračunava stepen sa bazom prirodnog logaritma 2.718281828459
Sintaksa: FUNCTION EXP(vrijednost:<REAL>): <REAL>;

Primjer izračunavanja stepenovanja.
                           
           ab= e ln ab      = e b*ln a    =exp(b*ln(a))

Tabela d.13. EXP - funkcija

Listing programa

Opis

PROGRAM pEXP;

Zaglavlje

FUNCTION Stepen(vrijednost, eksponent:REAL):REAL;

Potprogram

BEGIN

 

  Stepen := EXP(eksponent*LN(vrijednost));

Izračunavanje

END;

Kraj procedure

BEGIN

Glavni program

  WRITELN('3 na 2 je   ',  Stepen(3, 2):10:3);

Ispis  9:000

  WRITELN('3 na 2.5 je ',  Stepen(3, 2.5):10:3);

15.588

  WRITELN('3 na 0.5 je  ',  Stepen(3, 0.5):10:3);

1.732

READLN; END.

Kraj programa

Listing programa:


PROGRAM pEXP;
FUNCTION Stepen(vrijednost, eksponent:REAL):REAL;
BEGIN
  Stepen := EXP(eksponent*LN(vrijednost));
END;
BEGIN
  WRITELN('3 na 2 je   ',  Stepen(3, 2):10:3);
  WRITELN('3 na 2.5 je ',  Stepen(3, 2.5):10:3);
  WRITELN('3 na 0.5 je  ',  Stepen(3, 0.5):10:3);
  READLN;
END.

Izvršavanje
eksponent
3 na 2 je        9.000
3 na 2.5 je     15.588
3 na 0.5 je       1.732

Index