貴州大学明德学院VF程序复习题.docVIP

三、程序题 1.编写一程序，求1!+2!+3!……+10!的和。 参考程序如下： clear i=1 p=1 s=0 do while i=10 p=p*I s=s+p i=i+1 enddo ?s 2.编写一程序，输出1到100中能被5且不能被3整除的数。 参考程序如下： clear i=1 do while i=100 if mod(i,5)=0 and mod(i,3)0 ??i endif i=i+1 enddo 3.用自定义函数或子程序的方法编写程序，输入梯形的上底长、下底长和高，求梯形的面积。 参考程序如下： input 请输入梯形的上底 to a input 请输入梯形的上底 to b input 请输入梯形的上底 to h s=txmj(a,b,h) ?s function txmj parameters aa,bb,hh ss=(aa+bb)/2*hh return ss 4.编写一程序，输入学生成绩，判断相应的等级。（优秀、良好、中等、及格、不及格） 参考程序如下： clear input 请输入学生的成绩 to x do case case x=90 ?优秀 case x=80 ?良好 case x=70 ?中等 case x=60 ?及格 case x=60 ?不及格 endcase 5. 编写程序求出1到100之间同时满足除3余2和除4余2的数的和。 参考程序如下： clear i=1 s=0 do while i=100 if mod(i,3)=2 and mod(i,4)=2 s=s+i endif i=i+1 enddo ?s For i= 1 to 100 If i%3=2 .and. i%4=2 S=s+i endif endfor 6. 编写程序求出100到800之间同时满足除4余1和除5余3的数的个数。 参考程序如下： clear i=100 s=0 do while i=800 if mod(i,4)=1 and mod(i,5)=3 s=s+1 endif i=i+1 enddo ?s For i=100 to 800 If I%4=1 and i%5=3 S=s+1 Endif Endfor ?s 7. 编写程序，求3+6+12+24+48…只和。当累加和大于500时终止累加，输出此时的和。 参考程序如下： clear i=3 s=0 do while s=500 s=s+i i=i*2 enddo ?s 8. 编写程序输出如下图形。 * * * * * * * * * * * * * * * 参考程序如下： clear for i=1 to 5 for j=1 to i ??* endfor ? endfor  三、综合题 1.用SQL语句完成下列查询。 订购 客户 客户ID 订购日期 货物ID 数量 10101 09-01-2004 1015 5 10315 09-18-2004 1015 2 10329 10-28-2004 1017 1 10315 11-01-2004 1029 6 10315 11-02-2004 1017 4 10101 12-15-2004 1028 8 10101 12-22-2004 1017 3 10330 06-01-2005 1001 4 10330 06-18-2005 1029 3 10329 06-30-2005 1029 2 10101 07-08-2005 1008 2 10330 07-19-2005 1028 3 10101 08-13-2005 1001 1 10315 08-14-2005 1001 3 10101 08-18-2005 1009 1 客户ID 姓名 城市 10101 黎明 北京 10299 陈俊 广州 10315 罗云 广州 10325 韦林 上海 10329 王菱 深圳 10330 柳琴 上海 货物 货物ID 货物名 单价 1001 睡袋 568.00 1008 充气垫 898.00 1009 帐篷 768.00 1015 罗盘 26.00 1017 军刀 58.00 1028 手套 38.00 1029 雪靴