5.阅读下列程序，并给出运行结果 SET，FALK OFF CLEAR STORE 0 T0 X，Y，S1，S2，S3 D0 WHILE X<1O X=X +l DO CASE CASE INT(X/2)=X/2 S1：SI+X/2 CASE MOD(XJ 3)=0 S2=S2+X/3 CASE INT(X/2)<>X/2 S3=S3+1 ENDCASE ENDDO ?S1,S2,S3 SET TALK 0N RETURN 运行以上程序后，屏幕显示 1。