Faktorial dari bilangan asli n adalah hasil perkalian antara bilangan bulat positif yang kurang dari atau sama dengan n. Faktorial ditulis sebagai n! dan disebut n faktorial, tanda (!) disebut dengan notasi faktorial.
berikut adalah contoh penghitungan faktorial pada Delphi 7 dengan menggunakan procedure
pertama kita buka dulu Borland Delphi 7 dulu,,
kalau nggak tau caranya klik disini
berikut ini penulisan perintah Procedure
Faktorial dan hasilnya:
jangan lupa klik 'play' atau tekan F9 pada keyboard,,
masukkan angka seperti berikut ini,,
hasilnya akan keluar seperti gambar berikut ini,,
itulah hasil percobaan penghitungan faktorial di Delphi 7 dengan menggunakan Procedure,,
perintah intinya:
SysUtils;
procedure faktorial (var fak,hasil:integer);
var
i:integer;
begin
hasil:=1;
for i :=2 to fak do
hasil:=hasil * i;
end;
var
n, f: integer;
begin
write ('berapa faktorial?');readln (n);
faktorial(n,f);
writeln(n, '!=', f);
readln;
end.
keterangan perintah-perintah delphi 7 klik disini
***selamat mencoba***
