Question

S=1+22+333+…+nnn...n,其中nnn…n表示n个n,请设计一个程序求S的值 请用VF语言写出过程 并说明

Answer 1

clear

input "请输入N：" to n

s=0

for i=1 to n

k=""

for j=1 to i

k=k+alltrim(str(i))

endfor

h=int(val(k))

s=s+h

endfor

"S=1+22+333+…+nnn...n=",s