有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的值为（）。