题目内容:
函数值和余弦函数值,角度为1,2,3,…,90。请在空白处填入适当的内容,将程序补充完整。Private Type Ang
K As Integer
Si nx As Si ngle
Cosx As Si ngle
End Type
Private Sub Form_Click()
Di m Y As Si ngle
Di mi As Integer
Di m Ksc As Ang
Open ____________
Y =3.14159/180
For i =1To 90
Ksc .K =i
Ksc .Si nx=Si n(i*Y)
Ksc .Cosx=Cos(i +Y)
________
Next i
Close #2
Elld Stub A."..\Datal .txt"For Rando mAs #1Len =10 Put #1,i ,Ksc
B."..\Datal .txt"For Rando m As #1Len =10 Put #1,Y ,Ksc
C."..\Datal .txt"For Rando m As #1 Put #1,i ,Ksc
D."..\Datal .txt"For Rando m As #1 Put #1,Y ,Ksc
参考答案:【答案仅供学习,请勿对照自行用药等】
答案解析: