（27）有下列函数过程（ ）。 Function fun1(By Val x As Integer,By Valy As Integer) As Integer Do While y<>0 reminder=x Mody x=y y=reminnder Loop Fun1=x End Function 在下列按钮单击事件中调用该函数，则该程序的运行结果是。 Private Sub Command1_Click() Dim a As Integer Dim b As Integer a=100 b=25 x

题目

（27）有下列函数过程（ ）。 Function fun1(By Val x As Integer,By Valy As Integer) As Integer Do While y<>0 reminder=x Mody x=y y=reminnder Loop Fun1=x End Function 在下列按钮单击事件中调用该函数，则该程序的运行结果是。 Private Sub Command1_Click() Dim a As Integer Dim b As Integer a=100 b=25 x=funl(a,b) Print x End Sub A.0 B.25 C.50 D.100

相似考题

1.program exam(output); var x,y,x:integer; proedure silly(x:integer;vary:integer); begin x:=5;y:=6;z:=3; writeln(x,y,z) end; begin x:=1;y:=2;z:=3; silly(x,y); writeln(x,y,z) end. 以上程序运行结果为().A567 563B567 567C567 167D567 163

2.下列哪个函数不是舍入函数()。A、ROUNDUPB、ODDC、FLOORD、INTEGER

3.链表的定位函数loc(I:integer):pointer; {寻找链表中的第I个结点的指针}procedure loc(L:linklist; I:integer):pointer;var p:pointer;j:integer;

4.如果Add函数的调用代码为:func main() {var a Integer = 1var b Integer = 2var i interface{} = asum := i.(Integer).Add(b)fmt.Println(sum)}则Add函数定义正确的是()A.type Integer intfunc (a Integer) Add(b Integer) Integer { return a + b}B.type Integer intfunc (a Integer) Add(b *Integer) Integer { return a + *b}C.type Integer intfunc (a *Integer) Add(b Integer) Integer { return *a + b}D.type Integer intfunc (a *Integer) Add(b *Integer) Integer { return *a + *b}

更多“(27)有下列函数过程( )。 Function fun1(By Val x As Integer,By Valy As Integer) As Integer Do ”相关问题

  • 第1题：

    定义一个List对象list，使用ArrayList的构造方法进行初始化，并且要求list中必须全部存放Integer类型的对象，以下语句正确的是（）。

    A．List list = new ArrayList＜Integer＞();

    B．List list = new ArrayList ();

    C．List＜Integer＞ list = new ArrayList＜Integer＞();

    D．ArrayList＜Integer＞ list = new List＜Integer＞();


    List list = new ArrayList ();

  • 第2题：

    下列各函数首部中，正确的是（）。

    A．void play(var :Integer, var b:Integer)

    B．void play(int a, b)

    C．void play(int a, int b)

    D．Sub play(a as integer, b as integer)


    void play(int a,int b)

  • 第3题：

    定义一个List对象list，使用ArrayList的构造方法进行初始化，并且要求list中必须全部存放Integer类型的对象，以下语句正确的是（）。

    A．List list = new ArrayList ();

    B．List list = new ArrayList＜Integer＞();

    C．List＜Integer＞ list = new ArrayList＜Integer＞();

    D．ArrayList＜Integer＞ list = new List＜Integer＞();


    A

  • 第4题：

    定义一个List对象list，使用ArrayList的构造方法进行初始化，并且要求list中必须全部存放Integer类型的对象，以下语句正确的是（）。

    A．List list = new ArrayList ();

    B．List list = new ArrayList＜Integer＞();

    C．ArrayList＜Integer＞ list = new List＜Integer＞();

    D．List＜Integer＞ list = new ArrayList＜Integer＞();


    List list = new ArrayList ();

  • 第5题：

    8、下面哪些是将分数化为浮点数的正确定义？

    A.type Fraction = (Integer, Integer) rateq :: Fraction -> Float rateq (a,b) = a/b###SXB###B.type Fraction = (Integer, Integer) rateq :: Fraction -> Float rateq (a,b) = (fromInteger a)/ (fromInteger b)###SXB###C.type Fraction = (Integer, Integer) rateq :: Fraction -> Float rateq (a,b) = fromInteger (a/b)###SXB###D.type Fraction = (Integer, Integer) rateq :: Fraction -> Float rateq (a,b) = (fromIntegral a)/ (fromIntegral b)###SXB###E.ty
    A

  • 第6题：

    11、下面哪些定义是类型正确的？

    A．f :: (Integer, Integer) -> Float f (x,y) = x / y

    B．f :: (Integer, Integer) -> Float f (x,y) = (fromInteger x) / (fromInteger y)

    C．f :: (Integer, Integer) -> Float f (x,y) = 3*x + y

    D．f :: (Integer, Integer) -> Integer f (x, y) = 3*x + y


    AFT 通常由含有一个双氢呋喃环和一个氧杂萘邻酮(香豆素)的基本架构单位构成 AFT 分为 黄曲霉毒素B1(AFB1)、黄曲霉毒素 B2 (AFB2) 黄曲霉毒素G1(AFG1)、黄曲霉毒素 G2(AFG2) 黄曲霉毒素M1(AFM1)、黄曲霉毒素 M2(AFM2) B1、G1的呋喃环氢键异构。M1型氢键变为羟基。 1比2呋喃环上多了一个双键。

相关内容