Question

速求 求vfp程序设计题答案

设a,b为两个介于1和9之间的数字，若有式子aab+bb=baa成立，则a,b两数各应等于多少？试编程输出此问题的结果。（要源程序的）

Answer 1

此题出得有问题！现更改如下，否则无结果：
设a,b为两个介于1和9之间且包含1和9的数字，若有式子aab+bb=baa成立，则a,b两数各应等于多少？试编程输出此问题的结果。（要源程序的）
=======================================

CLOSE ALL
CLEAR ALL
CLEAR
SET TALK OFF
?
FOR nLoop_01 = 1 TO 9 - 1
FOR nLoop_02 = nLoop_01 + 1 TO 9 - 0
nAAB1 = VAL(ALLTRIM(STR(nLoop_01)) + ALLTRIM(STR(nLoop_01)) + ALLTRIM(STR(nLoop_02)) )
nBB1 = VAL(ALLTRIM(STR(nLoop_02)) + ALLTRIM(STR(nLoop_02)) )
nBAA1 = VAL(ALLTRIM(STR(nLoop_02)) + ALLTRIM(STR(nLoop_01)) + ALLTRIM(STR(nLoop_01)) )

nAAB2 = VAL(ALLTRIM(STR(nLoop_02)) + ALLTRIM(STR(nLoop_02)) + ALLTRIM(STR(nLoop_01)) )
nBB2 = VAL(ALLTRIM(STR(nLoop_01)) + ALLTRIM(STR(nLoop_01)) )
nBAA2 = VAL(ALLTRIM(STR(nLoop_01)) + ALLTRIM(STR(nLoop_02)) + ALLTRIM(STR(nLoop_02)) )

IF nAAB1 + nBB1 = nBAA1
??nLoop_01
??nLoop_02
?
?"等式 " + ALLTRIM(STR(nAAB1)) + " + " + ALLTRIM(STR(nBB1)) + " = " + ALLTRIM(STR(nBAA1)) + " 成立！"
ENDIF
IF nAAB2 + nBB2 = nBAA2
??nLoop_01
??nLoop_02
?
?"等式 " + ALLTRIM(STR(nAAB2)) + " + " + ALLTRIM(STR(nBB2)) + " = " + ALLTRIM(STR(nBAA2)) + " 成立！"
ENDIF
NEXT
NEXT
SET TALK ON

*** 屏显：等式 889 + 99 = 988 成立！