【单选题】如下程序的运行结果是() Sub Command1_Click ( ) MsgBox (p1(3.0, 7)) End Sub Public Function p1! (ByVal x!, ByVal n%) If n=0 Then p1=1 Else If n Mod 2=1 Then p1=x*p1(x, n2) Else P1=p1(x, n2) x End if End if End Fu...
【简答题】如下程序:Private Sub Command1_Click() Print p1(3,7)End SubPublic function p1!(x!,n%)If n=0 ThenP1=1ElseIf n Mod 2=1 ThenP1=x*p1(x,n\2)ElsePl=pl(x,n\2)\xEnd IfEnd IfEnd Function运行的结果是A. 27 B. 18 C. 7 D. 1...
【单选题】如下程序,运行的结果是 。 Sub Button1_Click(...) Handles Button1.Click MsgBox( p1(3.0, 7)) End Sub Public Function p1!( ByVal x!, ByVal n%) If n = 0 Then p1 = 1 Else If n Mod 2 = 1 Then p1 = x * p1(x, n \ 2) Else...