《Access数据库》 复习知识.pptVIP

模块 一下列程序的功能是求方程：x2十y2=1000的所有整数解。请在空白处填入适当的语句，使程序完成指定的功能。 Private Sub Commandl_Click（）Dim × as integer,y as integerFor x= -34 To 34　For y= -34 To 34　　If【1】Then 　　 Debug .Print x,y　　End If Next y　 Next x End Sub 参考答案： x^2+y^2=1000 模块 下列程序的功能是求算式：1+1/2 ! +1/3!+1/4!+……前10项的和（其中n!的含义是n的阶乘）。请在空白处填入适当的语句，使程序完成指定的功能。　 Private Sub Commandl_Click（）Dim i as integer,s as single,a as singlea=1:s=0For i=1 To 10　a=【2】 　　 s=s+aNext iDebug .Print “1+1/2!十1/3!+. …=”;s End Sub 参考答案： a/i 模块 下列程序的功能是找出被5、7除，余数为