中国DOS联盟

//::::::::::::::::::::::::::Fibonacci Series {s11ss 2007-12-16}::::::::::::::::::::::::::



var host,re,n=new Array(),i,num;



//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 total numbers:");

	num=WScript.StdIn.ReadLine();

	num=num.toString()-1;

}



//Calculate:

n=n=1;

for(i=2;i<=num;i++)	n=n+n



//Print:

WScript.Echo("The Fibonacci Series:");

for(i=0;i<=num;i++)	WScript.StdOut.Write(n+" ");

WScript.Stdin.ReadLine();