vfp程序设计

来源：百度知道 编辑：UC知道 时间：2024/05/18 01:19:29
两个题目：
1、求[100，800]内所有既不能被5整除又不能被7整除的个数。
2、把一张一元的钞票，换成一分，两分和五分硬币，每种至少五枚，问有多少种方案？
我很急，今天下去我就考试了，各位计算机的高手大哥，一定要帮帮我啊！感激不尽啊！

1
clea
S=0
for i=100 to 800
IF I%5<>0 AND I%7<>0
S=S+1
?I
ENDIF
ENDFOR
?S,"个数"
2
clea
?"分配方法如下:"
s=0
for i= 5 to 100
for j=5 to 50
for l= 5 to 20
if i+j*2+l*5=100
?allt(str(i)),"*1+",allt(str(j)),"*2",allt(str(l)),"*5=100"
s=s+1
endif
endfor
endfor
endfor
?"共",s,"种分配方法"