设有以下函数过程：
Functiofun(m As Integer)As Integer
Dimk As Integer,sum As Integer
sum=0
Fork=m To 1 Step-2
sum=sum+k
Nextk
fun=sum
End Function
若在程序中用语句s=fun(10)调用此函数，则s的值为______。

A$=Strillg$(10，“*”)
Fori=1 To 5
n=10-2*I
X$=A$：Y$=Space$(n)
Mid$(X$，i+1，n)=Y$
PrintX$
Nexti