clear n=0 for i=2 to 1000 k=i*i m=len(alltrim(str(i))) if (k-i)%(10^m)=0 then n=n+1 endif endfor n

题目

clear n=0 for i=2 to 1000 k=i*i m=len(alltrim(str(i))) if (k-i)%(10^m)=0 then n=n+1 endif endfor n
这个程序中的m=len(alltrim(str(i)))
if (k-i)%(10^m)=0

答案

你这是什么语言啊?有点像Basic.
alltrim(str(i))是将str(i)这个字符串左右两边的空格去掉,中间的不管,所以m=len(alltrim(str(i)))
这句话就是将去掉两边空格的字符串长度赋值给m.
10^m是运算10的m次方,然后 (k-i)除以(10^m)的余数判断是不是0.