y ＝ 2: t ＝ 0 Do
( ) a＝2/t
If ( ) Then Exit Do y ＝ y * a Loop
Print “pi＝”; y End Sub
南京师范大学泰州学院2011—2012学年度第二学期 电力工程学院电气专业10级《VB程序设计》期末考试试卷A卷 一、选择题 1．A 2．C 6．C 7．C 11．B 12．B 16．C 17．D
二、填空题 1．2 1．6 2．A 2．AB 3．2 3．2 4．6 4．6 5．7 5．9 6．0 6．8 7．13 7．13 8．3a 8．2b 9．5 9．14 10．5 15 10．2 35 11． 42 11． 138 12．1 12．9 13．4 5 9 13．5 -1 4 14． t＝Sqr(2+t)
参考答案：
3．A
4．C 5．A 8．B 9．B 10．C 13．B 14．C 15．B 18．A
19．C
20．C
2．ABC 3．30 4．3 5．4
7．13 8．1c 8．3
9．13 10．-1 56 11． 5796 12．7 13．1 2
14． Abs(a-1)<0.00001
