将下面的程序填写完整，如要计算1+2+…+10，请完成下面的程序，其中，s是单精度类型的变量。

D．im x as Integer，s as Single

s=0

F．or x=1 to 10

s=[ ]

Next x