长方形和一个正方形的周长相等，长方形长10米，宽比长少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的值为多少？