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
来源:学生作业帮助网 编辑:作业帮 时间:2024/06/25 16:14:20
![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](/uploads/image/z/12323420-44-0.jpg?t=clear+n%3D0+for+i%3D2+to+1000+k%3Di%2Ai+m%3Dlen%28alltrim%28str%28i%29%29%29+if+%28k-i%29%25%2810%5Em%29%3D0+then+n%3Dn%2B1+endif+endfor+n%E8%BF%99%E4%B8%AA%E7%A8%8B%E5%BA%8F%E4%B8%AD%E7%9A%84m%3Dlen%28alltrim%28str%28i%29%29%29if+%28k-i%29%25%2810%5Em%29%3D0)
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
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
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.