已知十进制正整数 m,要转换成 r 进制字符串 s,完成此功能,如下过程头(子过程或函数过程)定义,不正确的是 。
A: Sub tran(ByVal m%, ByVal r%, ByRef s$)
B: Sub tran(ByVal m%, ByVal r%, ByVal s$)
C: Function s$(ByVal m%, ByVal r%)
D: Function s$(ByVal r%, ByVal m%)
A: Sub tran(ByVal m%, ByVal r%, ByRef s$)
B: Sub tran(ByVal m%, ByVal r%, ByVal s$)
C: Function s$(ByVal m%, ByVal r%)
D: Function s$(ByVal r%, ByVal m%)
举一反三
- 已知十进制正整数 m,要转换成 r 进制字符串 s,完成此功能,如下过程头(子过程或函数过程)定义,不正确的是 。 A: Sub tran(ByVal m%, ByVal r%, ByRef s$) B: Sub tran(ByVal m%, ByVal r%, ByVal s$) C: Function s$(ByVal m%, ByVal r%) D: Function s$(ByVal r%, ByVal m%)
- 下列计算最大公约数的递归过程,正确的是___________。 A: Sub gcd(ByVal m%, ByVal n%) Dim r% r = m n If r = 0 Then gcd = n Else gcd = gcd(n, r) End If End Sub B: Sub gcd(ByVal m%, ByVal n%) Dim r% r = m Mod n If r = 0 Then gcd = n Else gcd = gcd(n, r) End If End Sub C: Function gcd%(ByVal m%, ByVal n%) Dim r% r = m n If r = 0 Then gcd = n Else gcd = gcd(n, r) End If End Function D: Function gcd%(ByVal m%, ByVal n%) Dim r% r = m Mod n If r = 0 Then gcd = n Else gcd = gcd(n, r) End If End Function
- 要想从子过程调用后返回两个结果,下面子过程声明语句正确的是( )。 A: Sub f1(ByVal n%, ByVal m%) B: Sub f1(ByRef n%, ByVal m%) C: Sub f1(ByRef n%, ByRef m%) D: Sub f1(ByVal n%, ByRef m%)
- 要想从子过程调用后返回两个结果,下面子过程语句说明合法的是( )。 A: Sub f1(ByRef n%, ByVal m%) B: Sub f1(ByRef n%, ByRef m%) C: Sub f2(ByVal n%, ByVal m%) D: Sub f1(ByVal n%, ByRef m%)
- 将十进制正整数d转换成r(2~9)进制的字符串,下列递归函数正确的是__________。 A: Function Trans$(ByVal d%, ByVal r%) If d = 0 Then Trans = "" Else Trans = Trans(d \ r, r) & (d Mod r) End If End Function B: Function Trans$(ByVal d%, ByVal r%) If d = 0 Then Trans = "" Else Trans = (d Mod r) & Trans(d \ r, r) End If End Function C: Function Trans$(ByVal d%, ByVal r%) If d = 0 Then Trans = Trans(d \ r, r) & (d Mod r) Else Trans = "" End If End Function D: Function Trans$(ByVal d%, ByVal r%) If d = 0 Then Trans = (d Mod r) & Trans(d \ r, r) Else Trans = "" End If End Function