下面的程序要计算1＋2＋…＋10,请补充完整。其中s是单精度类型的变量。 Dim x as Integer, s as Single

下面的程序要计算1+2+…+10,请补充完整。其中s是单精度类型的变量。

Dim x as Integer, s as Single

s=0

For x=1 to 10

s=【 】

Next x

s+xs+x 解析：s初值为0，进入循环后，x=1，假设s=s+x，则此时s=1，x加1以后再次进入循环，此时，s=s+2，则经过10次循环后，s=1+2+…+10，因此横线上应该填上s+x。