作业帮 > 综合 > 作业

for k =1 to 5,怎么算的?

来源:学生作业帮 编辑:神马作文网作业帮 分类:综合作业 时间:2024/11/18 07:13:22
for k =1 to 5,怎么算的?
private sub command1_click()
dim k as integer ,s as single,a as single,b as single
a=val(text1(0).text)
s=a
b=a
for k =1 to 5
s=s+val(text1(k).text)
if aval(text1(k).text)then
b=val(text1(k).text)
end if
next k
s=(s-a-b)/4
s=s*3*val(text2.text)
text3=int(s*100)/100
end sub
for k =1 to 5,怎么算的?
就是从1到5的循环,最开始的时候k=1,下一次2,依次一直到5是最后一次
所以从1到5循环5次
再问: 这题是填空题,从哪可以看出是1到5的循环?
再答: 抱歉,我没懂你什么意思。。。 你不是写“for k=1 to 5”吗? 这就是1到5的循环啊?
再问: 填空题,5这个位置原来是空格要填的,答案上是5
再答: 哦,这样啊。你的题里面没有说明这个是干嘛的,我就按照我对程序的理解猜测一下。 应该是从text1中的六个值里面,求平均数,然后乘以三再乘以text2,然后取两位小数 这里平均数的算法,是求出最大值和最小值,然后用所有数字的和减去最大最小值,再求平均。 所以,在倒数第四行,可以看出,(s-a-b)/4是求平均值,减掉最值后,再除以4,说明一共有6个数字。而程序开始时,先是取出text1(0),再从1到k,共6个数字,就是0,1,2,3,4,5,因此,循环从1到5