【答案】有如下函数过程：Function Cys(ByVal x As Integer, ByVal y As Integer)

返回首页智慧树时间：2022-11-15 19:17

题目 / 答案提交正确答案

有如下函数过程：Function Cys(ByVal x As Integer, ByVal y As Integer) As Integer Dim quotients Do While y <> 0 quotients = x / y x = y y = quotients Loop Cys = xEnd Function以下是调用该函数的事件过程，该程序的运行结果是（）。Private Sub Command1_Click（） Dim a As Integer Dim b As Integer a = 10 b = 2 x = Cys(a, b) Print xEnd Sub

A.0

B.25

C.5

D.100

正确答案：5

点击查看答案

本文链接：https://www.oyuuu.com/Ti/ZhiHuiShu/352366.html

关键字  浏览量：次

叙述正文原理气体热胀冷缩现象职工国营企业

上一篇：以下是一个能返回数组a中最大数的函数过程代码： Function maxval(a（） As Integer) As I

下一篇：有如下函数过程：Function secproc(x As Integer, y As Integer, z As In

相关问题

【智慧树】有如下函数过程：Function secproc(x As Integer, y As Integer, z As In

【答案】有如下函数过程：Function Cys(ByVal x As Integer, ByVal y As Integer)

热门问题