1.求1到2000之间,能被3或7整除,并且含有数字5的整数的个数
vfp吧
全部回复
仅看楼主
level 7
king4wise 楼主

1.求1到2000之间,能被3或7整除,并且含有数字5的整数的个数、它们的和、它们的平方根的和(保留2位小数)、以及它们的平方和。
clear
store 0 to n,s1,s2,s3
for i=1 to 2000
if (mod(i,3)=0 or i%7=0) and ‘5’$str(i)
n=n+1
s1=s1+i
s2=s2+sqrt(i)
s3=s3+i^2
endif
next
? “个数:”,n,”和:”,s1,”平方根和:”,s2,”平方和:”,s3
2013年01月05日 02点01分 1
level 1
为什么有不能识别的语句
2017年04月23日 09点04分 2
level 3
clear
store 0 to n,s1,s2,s3
for i=1 to 2000
if (mod(i,3)=0 or i%7=0) and "5"$str(i)
n=n+1
s1=s1+i
s2=s2+sqrt(i)
s3=s3+i^2
endif
next
? "个数:"+STR(n)+"和:"+STR(s1)+"平方根和:"+STR(s2)+"平方和:"+STR(s3)
不允许中文“双引号并且最后是需要数字转字符的,并且用+号把字符串串起来。
2017年04月24日 03点04分 3
1