中国DOS联盟

//阶乘	{s11ss 2007-12-16}

var host,re,i,num,answer=1;

//ScriptHost:
host=WScript.FullName;
host=host.substring(host.length-11,host.length).toLowerCase();
if(host=="wscript.exe")	{
	host=new ActiveXObject("WScript.Shell");
	host.Run("cmd /ccscript/nologo \""+WScript.ScriptFullName+"\"");
	WScript.Quit();
}

//Receive a number:
re=/^\d+$/gi;
while(!re.test(num))	{
	WScript.Echo("Please input the number:");
	num=WScript.StdIn.ReadLine();
	num=num.toString();
}

//Calculate:
for(i=1;i<=num;i++)	answer=answer*i

//Print:
WScript.StdOut.Write(num+"!\n=");
for(i=num;i>=2;i--)	WScript.StdOut.Write(i+"*");
if(num>1)	WScript.StdOut.Write("1\n="+answer); else	WScript.StdOut.Write("1");
WScript.Stdin.ReadLine();