用VISUAL FOXPRO编写1000之间所有能被9整除的奇数及其平方值

来源：百度知道 编辑：UC知道 时间：2024/06/11 03:58:45
水帮帮我啊 我做不好了

如果你的条件是0到1000之间的所有能被9整除的奇数,则程序如下:
SET TALK OFF
I=0
DO WHILE I<=1000
IF MOD(I,9)=0 .AND. MOD(I,2)=1
?I
??" "
??i^2
ENDIF
I=I+1
ENDDO
SET TALK ON
RETURN