VB程序的设计基础复习题答案.doc

<VisualBasic>程序设计基础P16****题一 一,判断题  1,错   2,对   3,错      4,错    5,6,7,对     二,单选题  1,B   2,B   3,D   4,A    5,D   6,B    7,B   8,C   9,D 三,程序设计题5,mand1_Click()="宋体""中文字体宋体"mand2_Click()="楷体_GB2312""中文字体楷体"mand3_Click()="仿宋_GB2312""中文字体仿宋"EndSub  P42 ****题二一,判断题    1,2,3,7,10, 对  4,5,6,8,9,11,12,13,14     错二,单选题  1,A   2,C    3,C    4,B    5,B  6,A   7,B    8,C    9,B    10,C  11,C  12,D   13,B   14,A   15,D  16,B  17,B   18,C    19,B  20,B 21,B    22,D  23,A    24,C   25,B 26,A    27,D   28,B   三,简答题(1)2*Cos(alfa)*Sin(alfa/(2*a)(2)Sqr(s*(s–a)*(s–b)*(s-c))(3)(A^2+B*C*(X+Y))/(A+B)(4)(2**r+Exp(-5))*Log(x)(5)1/(x+1/(y+1))(6)k/(1+a*Exp(-b*x))(7)5+6*x/(3*(x^2-1)-2*x)(8)Sqr(y^3+3*(a^2+b^2)/(x^2+y^2))2.(1)(a+b)Modc(2)Sqr(Abs(x))(3)Int(x)+1(4)Int(Rnd*101)+()DimaAsInteger,bAsIntegerDimcAsInteger,yAsLonga=InputBox("请输入a的值")b=InputBox("请输入b的值")c=InputBox("请输入c的值")y=a^2+2*b^2+2*c^2Print"y=";yEndSub   4。 (1) F   (2)T    (3)F   (4) T5.(1)1<=xAndx<12(2)T+3<>V-2And(T+V)>100(3)(a+b)>=cor(a-c)<=c(4)a>0AndInt(a)=aAndb>0AndInt(b)=bora<0Andb<0(5)x<=yOrx>=z(6)a=0Andb<>0ora<>0Andb=0四,()DimaAsInteger,bAsIntegerDimcAsInteger,yAsSinglea=InputBox("请输入正整数a的值")b=InputBox("请输入正整数b的值")c=InputBox("请输入正整数c的值")y=(a+b+c)/3Print"平均值y=";()DimrAsInteger,sAsSingleC