function Faktorialis ( n: NATURAL ) return NATURAL is
begin
	if n=0 then return 1; else return n * Faktorialis(n-1); end if;
end Faktorialis;