程序如下:
USEAB
DOWHILE.NOT.EOF()
IFXB=“女”.AND.ZF<900
W=ZF
ELSE
W=XF+1
ENDIF
SKIP
ENDDO
?W
运行后输出W的值为
2.有FOXBASE程序如下:
SETTALKOFF
CLEAR
STORE1TOX
STORE2001TOY
DOWHILEX<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.汇编程序如下:
MOVAX,1234H
MOVBX,5678H
ADDAL,BL
DAA
MOVCL,AL
MOVAL,AH
ADCAL,BH
DAA
执行程序后(AL)=,(CL)。
上一页 [1] [2] [3] [4] [5] [6] [7] [8] 下一页 |