《第4章 VB控制结构》习题(5)

A、If X Then Y = Y + 1 B、If X = 0 Then Y = 0 C、If X > 0 Then Y = 1: Print Y D、If X > Y Then Print Y End If 三、编程题

1、 编程计算下列函数。

SinX X 20 Y= CosX 0 X 20

e X 0

2

2、 求一元二次方程ax+bx+c=0的根。

2

提示：从初等代数可知，此方程有两个根，它有三种可能（设d=b-4ac）：

（1） 若b-4ac>0，有两个不等的实根：x1,2 （2） 若b2-4ac=0，有两个相等的实根：x1,2 （3） 若b2-4ac<0，有一对共轭复根：x1,2

2X

b

2a b2a

d

d2a

b2a

i

3、 某商品价格随购货数量而定，买100个以上（含100个，下同）的打9折，200个以上的打8.5折，300个以上的打8折，400个以上的打7.5折，500个以上的打7

折。设商品单价为65元，要求从键盘输入购买商品数量后，显示出总货款。

20

4、 求 n!（即求1！+2！+3！+ +20！）。

n 1

5、 输出斐波纳契（fibonacci）数列的前20项。数列的规律是：第一、二个数是1，从

第三个数起，该数是前面两个数之和。 6、 如果我国工农业生产值每年以12%增长率递增，问多少年后产值翻一番？

7、 求出2000 — 2005年之间的所有闰年。闰年的条件是：能被4整除但不能被100整除的年份，或者能被400整除的年份，如2000年、2004年是闰年，而2001年、2100年不是闰年。

8、 找出1~1000之间的全部“水仙花数”。“水仙花数”是这样的一个整数，它的每位数字的立方之和正好等于这个三位数。例如153是水仙花数，因为1+5+3=153。 9、 在窗体上输出如图18所示的图形。

图4-18 编写代码输出图形

10、 输出九九乘法表。

3

3

3