把两个程序给你把,窗口自己做
* 建立“考试一.prg”程序
* 编程显示[100,500]以内能被7和11整除的所有自然数;
for aa=100 to 500
if mod(aa,7)=0.and.mod(aa,11)=0
?aa
endif
endfor
* 建立“考试二.prg”程序
* 编程求[100,500]以内同时满足除以7余3,除以5余3,除以3余1所有整数的个数。
a=0
for aa=100 to 500
if mod(aa,7)=3.and.mod(aa,5)=3
a=a+1
?'第',a,'个数是:',aa
endif
endfor
?
?'总:',a,'个数'