华南理工大学高级语言程序设计作业

1、艿 高级语言程序设计 (VB.NET) 作业 螄2014.3 羃教学中心：专业层次： 肈学 号：姓 名： . 羇判断题 ( 如正确打，否则，打。 ) 1 2 螄存储数据不属于数据处理功能。 N 莃2. Write_1 和学校 $ 是正确的变量名。 Y 袀 3若一个整型变量说明了之后没有给它赋值，则它的值为0。 Y 螆 4判别 ch 是否为小写字母，若是，输出“ yes”；否则，输出“ No”的块结构条件语句为 :Y 袄 If Asc(ch)=97 And Asc(ch)=122 Then 蒀 WriteLine ( “ Yes” ) 芈 Else 薅WriteLine( “No” ) 羄 En

2、d If 袁 5. 。输入结构变量的值就是输入该变量的各个元素的值Y 羀 6函数过程定义中必须有一个赋值语句把表达式的值赋给函数过程名。N 薈 7. 事件是由 VB.Net 系统预先设置好或者在程序中由编程者自己设计的，它能够被对象识别的 动作。 Y 肃 8. 从文件取出一组数据以流的方式存放到程序的变量或数组中称为向流写入数据。N 节 9. 文件流类 FileStream 用于打开和关闭文件，并提供对文件按字节的读 / 写操作。 Y 蒈 10. 在 VB 中不可以把类型说明符放在变量名的末尾来说明变量的类型。N 四. 莇单项选择题 膃 1. 下列变量名中错误的是 ( “年龄” ) 。 蚃 2

3、设 X 为整型变量 , 不能正确表达 1 X 5 的逻辑表达式是 (1 X 10 End Select WriteLine(x=0 y=1 , x, y) End Sub End Module 薁答案: 袈 1 芆 x=2 y=4 膄 x=8y=9 羈 x=4y=8 薇 x=15 y=226 莆 2. 写出执行下列程序的输出结果。 莁Imports System.Console 螀 Module Module1 莅 Sub Main() 蒆Dim f(10) As Integer 螁f(0) = 1 : f(1) = 1 膈For i = 2 To 10 莈f(i) = f(i-2) + f(

4、i-1) 薆Next i 膂For i = 0 To 10 袀If Int(i/4)=i/4 Then WriteLine() 膇Write(f(0)=1, i, f(i) 薆Next i 薃End Sub 莈 End Module 羆 f(0)=1 f(1)=1 f(2)=2 f(3)=3 蚅f(4)=5 f(5)=8 f(6)=13 f(7)=21 蚀f(8)=34 f(9)=55 f(10)=89 肀五. 程序填空题 项的值小于 211 螅 1. 下面程序的功能是使用公式22求 的近似值，直到最后 61222 0.00001 为止，在横线上填上适当内容。 螅 Imports System

5、.Console 肁 Imports System.Math 薈 Module Module1 螈 Sub Main() 袅 Dim i&, s#, term# 蒂 i = 1 芀 s = 0 薇 Do term = 1 / (i * i) s + term 蚇i = i + 1 芆 Loop While term = 0.00001 肅 WriteLine( 圆周率的近似值为： 0, Sqrt(6 * s) 芄 End Sub 葿 End Module 荿 2. 下面程序的功能是输入 m和 n 的值，并按公式： cmnm! 求组合数的程序，在横线上 n!(m n)! 填上适当内容。 膅 Imports System.Console 蒀 Module Module1 膁Sub Main() 肇Dim m&, n&, cmn#, c1&, c2&, c3& 膅Write(n=) 袁n = ReadLine() 蕿Write(m=) 袆m = ReadLine() 芅Call fac(m, c1) : Call fac(n, c2) : Call fac(m - n, c3) 节cmn = c1 / (c2 * c3) 芁 WriteLine(cmn=0 , cmn) 蚅 End Sub 莄 Private Sub fa