Considere o código em Delphi 7 abaixo e, em seguida, assinale a alternativa correta.

function Fatorial(n:Extended):Extended;

begin

if n=0 then

result := n-1

else

result := n * Fatorial(n)

end;