Resposta ao desafio de ASP x PHP fatorial

Bha, tava muito frio… mas sabe como é, Muita Ceva gelada faz o cara ficar com calor… hehe

Agente faz o possivel, ainda defendo um pouco o ASP, mesmo usando para soluções específicas, afinal ainda tem cliente que usa.
Mas já totalmente migrado para o PHP também, ui!

Não me deixou muito para trabalhar, fazer menor que isso acho que não seria possivel.
Então, o básico ficou apenas uma tradução de ASP para PHP, com a mesma quantidade de linhas. Porém dei uma aumentada no código, para poder calcular o fator de números negativos também, por isso ficou um pouco maior.

Só fico devendo o tempo de execução do código, pelo navegador não retorna valor.

function fatorial( n )
	n = clng(n)
	if n < 0 then
		total = 1
		n = abs( n )
		for i = n to 1 step -1
			total = total * i
		next
		fatorial = -total
	elseif n = 0 then
		fatorial = 1
	else
		total = 1
		for i = n to 1 step -1
			total = total * i
		next
		fatorial = total
	end if
end function

É isso ae seu Felipe Olivaes. O próximo desafio é tu que comanda e eu posto antes.