max=10 000
For i=1 To 10
s=0
For j=i To 10
s=s+a(j)
If s>max Then max=s
Next j
Next i
已知数组a(1)到a(10)的原始数据为6,-6,8,-7,7,2,-2,-1,-2,4。程序执行后,变量max的值为( )
输入x的值为7,执行这部分流程,输出n的值为( )
max=a(1)
For i=2 To 10
Next i
当虚线框内的语句刚好执行完第6次后(此时循环变量i的值为7),变量max的值是( )
Private Sub Command1_Click( )
Dim i As Integer, n As Integer, s As Integer
n = val(Text1. Text)
s = 0:1 = 1
Do While i < n
s = s + i
i = 1 + 2
Loop
Text2. Text = str(s)
End sub
该程序运行后,在文本框Text中输入10,单击按钮 Command1后,在文本框Text2中显示的内容是( )
①变量s的初值是0,变量n的初值是1;
②若变量n的值大于100,则转到步骤⑤;
③s←s+(-1)n-1×n;
④n的值增加1,转到步骤②;
⑤输出s的值;
⑥结束。
下列数学表达式中,其计算结果与上述算法执行后变量s的值相等的是( )
辗转相除法的算法步骤是,对于给定的两个正整数m、n(m>n),用m除以n得到余数r,若余数r不为0,就将n和r构成新的一对数(m=n,n=r),继续上面的除法,直到余数为0,这时m就是原来两个数的最大公约数。因为这个算法需要反复进行除法运算,故被形象地命名为“辗转相除法”。小曲设计了辗转相除法的算法,请根据下面算法回答问题。
|
描述一 |
描述二 |
描述三 |
|
①输入两个正整数m,n(m>n); ②计算m除以n所得的余数r; ③m=n, n=r; ④若r=0,则m,n的最大公约数等于m;否则转到步骤②; ⑤输出最大公约数m; ⑥结束。 |
| |
| ⒈ 开始 ⒉ 输入圆半径r ⒊ 计算圆面积 s=3.14*r*r ⒋ 输出圆面积 ⒌ 结束 | | r=inputbox(“r=”) s=3.14*r*r print s |
| a | b | c |
