给出以下程序的运行结果：
SETTALK OFF
X=0
Y=0
D0 WHILE X<100
X=X+1
1F INT(X／2)=X／2
LOOP
ELSE
Y=Y+X
ENDIF
ENDDO
?"Y=",Y
RETURN
运行结果为( )
A．Y=500 B．Y=1500 C．Y=2090 D．Y=2500