标题: [原创js]阶乘
[打印本页]
作者: s11ss
时间: 2007-12-16 23:44
标题: [原创js]阶乘
//阶乘 {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();