Menghitung nilai faktorial dari bilangan bulat tidak negatif

Buatlah fungsi untuk menghitung nilai faktorial dari bilangan bulat tidak negatif. Faktorial dari n didefinisikan sebagai :



n! = 1                                    , jika n = 0
    = 1 x 2 x 3 x ... x (n-1) x n , jika > 0

Misalnya, 5! = 1 x 2 x 3 x 4 x 5 = 120


-----------------------------------
function Fak(input n : integer) -> integer
{ mengembalikan nilai n!, untuk n >= 0 }

DEKLARASI
i,f : integer

ALGORITMA
f<-1
for i <- 1 to n do
     f <- f * i
endfor
return f