更多"假定有n个关键字，它们具有相同的散列函数值，用线性探查方法把这n个关键"的相关试题:
[填空题]下列事件过程的功能是：建立一个名为Datal的随机文件，存放角度值及这些角度的正弦函数值和余弦函数值，角度为1，2，3，…，90。请在空白处填人适当的内容，将程序补充完整。
Private Type Ang
K As Integer
Sinx As Single
Cosx As Single
End Type
Dim Ksc As Ang
Private Sub Form_Click（ ）
Dim Y As Single
Open“c:/Datal.txt”For Random As #2 Len=10
Y=3.14159/180
For i=1 To 90
Ksc.K=i
Ksc.Sinx=Sin(i * Y)
Ksc.Cosx=Cos(i * Y)
______
Next
Close #2
End Sub
[填空题]下列事件过程的功能是：建立一个名为Data1的随机文件，存放角度值及这些角度的正弦函数值和余弦函数值，角度为1，2，3，…，90。请在空白处填入适当的内容，将程序补充完整。
Private Type Ang
K As Integer
Sinx As Single
Cosx As Single
End Type
_________________________’定义Ang类型的变量Ksc
Private Sub Form_Click（ ）
Dim Y As Single
Open "C:/Datal.txt" For Random As #1 Len = 10
Put #1, 1, Ksc
Y = 3.14159 / 180
For i = 1 To 90
Ksc. K=i
______= Sin(i*Y)’给变量Ksc的正弦函数值赋值
Ksc.Cosx = Cos(i*Y)
Next i
Close #1
End Sub
