Loto
■□WindowsScriptHost で Loto の数字を生成する script
■□ lotos() ※ 改訂版
function lotos(ltMd){ var ltCeil; L = new Array(ltMd); function getLtAtom(){ return(Math.ceil(Math.random()*ltCeil)); } for(i=c=0; i<md; c+= ++i); ltCeil=c*2+1; for(L[0]=getLtAtom(),_do=false,i=1;i<ltMd ;i++){ do{ for(j=0,L[i]=getLtAtom();j<i && !_do;_do=(L[i]==L[j++])) ; }while(_do) } for(i=0;i<ltMd;i++){ s= "00"+ L[i]; L[i]=s.substr(s.length-2,2) } return(L.sort().toString()); } WScript.Echo(lotos(6));