三道编程题求解！

向日小葵

三道编程题目，如何用 Visual FoxPro 解答？



1.设X代表货物重量，Y代表运费，其关系如下式：

X×5
X<=50
Y=
X×10
50<X<=100

X×15
X>100
试编写由X值计算的Y程序。



2. 统计1~50间不能被7整除的数的个数，并求这些数的积。



3. 判断某一年是否是润年，如是润年则能被4整除但不能被1 0 0整除，或能被4 0 0整除。

我的Susan说

小葵...
帮不鸟你了
自己还在为2级担心..

夏天新童话

１．clear
input "请输入货物重量"　to x
if x<=50
   y=x*50
else
   if x<=100 and x>50
      y=x*10
else
  y=x*15
endif
endif
?"运输费为"＋str(y,8,2)
return

2.clear
n=0
m=1
for i=1 to 50
if mod(i,7)!=0
n=n+1
m=m+1
endif
endfor

3.clear
input "请输入年份"　t o y
if y%4=0 and y%100# 0 or y%400=0
?y"是闰年"
else
?y"不是闰年"
endif
cancel

向日小葵

:loveliness: 谢谢~太感谢鸟~~

忆尘流年

考2级么？

向日小葵

:shocked 恩。。

忆尘流年

想起当时背那些xxxx。。。头就大大的。。
考前15分钟抓题竟然都让我抓到了。。。正好踩线－－

shzkkqq

:L 求润年明摆着是书上的~~楼主太懒了

寂寞森林

靠。这个不是例题么。上课的时候讲过啊- -

向日小葵

:m32 多年前的题目。。实在没那记性记到现在。。