Program pascal untuk mencari nilai faktorial

Program pascal untuk mencari nilai faktorial - Sebelum mengenal programnya terlebih dahulu untuk kawan - kawan yang belum mengerti apa itu faktorial. faktorial dari bialngan asli n adalah hasil perkalian antara bilangan bulat positif yang kurang dari atau sama dengan n. Faktorial ditulis sebagai n! dan disebut n faktorial (wikipedia).

sebagai contoh 5! = 1 x 2 x 3 x 4 x 5 = 120.

setelah kita mengetahui bagai mana cara mecari faktorialnya sekarang kita langsung meluncur ke scriptnya :

Program Fak_n;

function Faktorial(a:integer):longint;

uses crt;

begin

Faktorial:=1

if (A=1)then
else

end;

Faktorial:=a*faktorial(a-1);

var
x:integer;

write('Masukan Angka Yg Akan di Faktorial : ');

begin
clrscr;
readln(x);

end.

writeln(x,'!','= ',faktorial(x));
readln;

readln;

Baca juga : Membuat Program Linear Search dengan pascal

Program pascal untuk mencari nilai faktorial anda sekarang sudah selesai, baca juga tutorial program pascal lainnya.