高考问答火影之最强之道txt:一个小编程题
来源：百度文库 编辑：高考问答 时间：2024/05/06 07:50:22
a b c d e
+2 0 0 8 5
------------
f g h i j
其中2008表示2008年在北京举办奥运会，
5表示奥运五环，所以合起来20085刚好表示2008奥运。
要求abcdefghij分别表示从0到9的一位数字，而且不允许重复使得上面的加法表达式成立.
最后将所有满足条件的j从小到大连在一起
帮我看下，给个过程和结果，谢谢了
什么方法都可以
把下面的代码复制到文本文件 改名为a.vbs 双击运行
msgbox "开始"
for a=0 to 9
for b=0 to 9
if a<>b then
for c=0 to 9
if (a<>c and b<>c) then
for d=0 to 9
if a<>d and b<>d and c<>d then
for e=0 to 9
if a<>e and b<>e and c<>e and d<>e then
for f=0 to 9
if a<>f and b<>f and c<>f and d<>f and e<>f then
for g=0 to 9
if a<>g and b<>g and c<>g and d<>g and e<>g and f<>g then
for h=0 to 9
if a<>h and b<>h and c<>h and d<>h and e<>h and f<>h and g<>h then
for i=0 to 9
if a<>i and b<>i and c<>i and d<>i and e<>i and f<>i and g<>i and h<>i then
for j=0 to 9
if a<>j and b<>j and c<>j and d<>j and e<>j and f<>j and g<>j and h<>j and i<>j then
if (a*10000+b*1000+c*100+d*10+e+20085)=(f*10000+g*1000+h*100+i*10+j) then
msgbox a&b&c&d&e &"+20085=" &f&g&h&i&j
end if
end if
next
end if
next
end if
next
end if
next
end if
next
end if
next
end if
next
end if
next
end if
next
next
msgbox "完成"
<%
Response.Buffer=True
Dim a,b,c,d,e,f,g,h,i,j,num1,num2
For a=0 To 9
For b=0 To 9
For c=0 To 9
For d=0 To 9
For e=0 To 9
For f=0 To 9
For g=0 To 9
For h=0 To 9
For i=0 To 9
For j=0 To 9
num1=Clng(a&b&c&d&e)
num2=Clng(f&g&h&i&j)
If num1+20085=num2 Then
Response.Write(num1&"+20085="&num2)
Response.Flush()
End If
Next
Next
Next
next
Next
Next
Next
Next
Next
Next
Response.End()
%>
这段程序可以求出并输出所有符合条件的abcdefghij，你可以加以利用。
用 C++可否?
使用最简单的算法,需要5秒钟左右的时间才能计算出来,可否?如果觉得太慢的话就提高悬赏
用什么？