回 帖 发 新 帖 刷新版面

主题:求教个题目,谢谢

A B C D
*     9
________
C D B A

ABCD为0到9的数字。
我感觉没写错,但是不对。郁闷。
我的程序:
A=1:D=9
FOR B=0 TO 9
FOR C=1 TO 9
IF (A*1000+B*100+C*10+D)*9=C*1000+D*100+B*10+A
PRINT A,B,C,D
NEXT C
NEXT B
END

回复列表 (共2个回复)

沙发

请教题目:一个类的静态数据成员所表示属性

板凳


楼主的题目错了 我觉得是ABCD*9=DCBA 答案是1089 若照你原题目 是 无解的 附程序下:

a = 1: D = 9
For b = 0 To 9
For c = 1 To 9
If Abs((a * 1000 + b * 100 + c * 10 + D) * 9 - (D * 1000 + c * 100 + b * 10 + a)) < 0.1 Then Print a; b; c; D
Next c, b
end

我来回复

您尚未登录,请登录后再回复。点此登录或注册