Minggu, 30 Januari 2011

Fungsi Logaritma dan Exponsial

Pascal mempunyai fungsi logaritma dinyatakan dengan Ln an fungsi eksponensial yang dinyatakan dengan fungsi Exp. Eksponensial merupakan antilog, dimana suatu bilangan yang dilogaritma dieksponensialkan akan menghasilkan angka semula.
Tata penulisan kedua fungsi tersebut adalah :
   Bil_Hasil := Ln(Bil_Dicari);
   Bil_Hasil := Exp(Bil_Dicari);
dimana Bil_Hasil merupakan suatu variabel real dan Bil_Dicari dapat berupa suatu bilangan atau suatu variable real.

Contoh Program
program Log1;
uses crt;
var
   Bil1 : real;
begin
   clrscr;
   write('masukkan bilangan yang dilogaritma : ');
   readln(Bil1);
   writeln('hasil logaritma = ',Ln(Bil1):10:2);
   writeln('Hasil Exponensial = ',Exp(Ln(Bil1)):10:2);
   readln;
end.

0 komentar:

Posting Komentar