2.有FOXBASE程序如下:
SET TALK OFF
CLEAR
STORE 1 TO X
STORE2001 TO Y
DO WHILE X<Y
IF .NOT.(INT(X/2)=X/2)
X=X^2+1
Y=Y+1
ELSE
X=X+1
ENDIF
ENDDO
?X
?Y
运行后X的值为 Y的值为 。
3.汇编程序如下:
MOV AX,1234H
MOV BX,5678H
ADD AL,BL
DAA
MOV CL,AL
MOV AL,AH
ADC AL,BH
DAA
执行程序后(AL)= ,(CL) 。