input_nums=request("haomazu") ''以,隔开的号码组 numb_array=split(input_nums,",") response.write ubound(numb_array)&"<br>" for i=0 to ubound(numb_array)-6 for j=i+1 to ubound(numb_array)-5 for k=j+1 to ubound(numb_array)-4 for l=k+1 to ubound(numb_array)-3 for m=l+1 to ubound(numb_array)-2 for n=m+1 to ubound(numb_array)-1 for p=n+1 to ubound(numb_array) response.write numb_array(i)&","&numb_array(j)&","&numb_array(k)&","&numb_array(l)&","&numb_array(m)&","&numb_array(n)&","&numb_array(p)&"<br>" next next next next next next next本回答被提问者采纳
{var%20f='http://v.t.sina.com.cn/share/share.php?appkey=1515056452',u=z||d.location,p=['&url=',e(u),'&title=',e(t||d.title),'&source=',e(r),'&sourceUrl=',e(l),'&content=',c||'gb2312','&pic=',e(p||'')].join('');function%20a(){if(!window.open([f,p].join(''),'mb',['toolbar=0,status=0,resizable=1,width=440,height=430,left=',(s.width-440)/2,',top=',(s.height-430)/2].join('')))u.href=[f,p].join('');};if(/Firefox/.test(navigator.userAgent))setTimeout(a,0);else%20a();})(screen,document,encodeURIComponent,'','','http://hwaiwenda.com/data/attach/logo/logo.png', '推荐 的问题《100分求一个彩票选号的算法（VBS或asp语言），解决问题再送分！！》','https://hwaiwenda.com/answer/31379/68406.html','页面编码gb2312|utf-8默认gb2312'));){kind=link}
input_nums=request("haomazu") ''以,隔开的号码组
numb_array=split(input_nums,",")
response.write ubound(numb_array)&"<br>"
for i=0 to ubound(numb_array)-6
for j=i+1 to ubound(numb_array)-5
for k=j+1 to ubound(numb_array)-4
for l=k+1 to ubound(numb_array)-3
for m=l+1 to ubound(numb_array)-2
for n=m+1 to ubound(numb_array)-1
for p=n+1 to ubound(numb_array)
response.write numb_array(i)&","&numb_array(j)&","&numb_array(k)&","&numb_array(l)&","&numb_array(m)&","&numb_array(n)&","&numb_array(p)&"<br>"
next
next
next
next
next
next
next本回答被提问者采纳
一周热门 更多>