1到100之间所有3的倍数的和是多少-搜答案-拍题作业网

settalkoffclearfori=1to100ifi%3=0.and.i%7=0?iendifendforsettalkon

1:12:1,23:1,34:1,2,45:1,56:1,2,3,67:1,78:1,2,4,89:1,3,910:1,2,5,1011:1,1112:1,2,3,4,6,1213:1,1314:1,

200÷7=28余4所以最小的7的倍数是203300÷7=42余6所以最大的7的倍数是294一共有：(294-203)÷7+1=14个其和为：(203+294)×14÷2=3479

=SUM(IF(MOD(ROW(1:1000),5)=0,ROW(1:1000)))-SUM(IF(MOD(ROW(1:1000),3)=0,ROW(1:1000)))ctrlshiftenter运行

现在命令窗口输入：modifycommandqh让后在弹出了窗口中输入：clearstore0tosfori=8to100ifmod(i,8)=0s=s+iendifendfor"10到100之间的所

#includeintmain(void){inti,sum;sum=0;for(i=1;i

while(m

if(){}else{}alert();类似这样的答案么?

1到100这100个数中,是5的倍数的数的和是5+10+15+20+……+100=(5+100)×20÷2=1050,那么不是5的倍数的数的和是：5050-1050=4000再问：为什么要用5050-

*VF编程统计1~100之间3的倍数的个数和7的倍数的个数.STORE0TOn3,n7FORi=1TO100IFMOD(i,3)=0n3=n3+1ENDIFIFMOD(i,7)=0n7=

既是3的倍数又是5的倍数,那么这个数是15的倍数的时候可以实现.而100以内15以及15的倍数有：15、30、45、60、75、90所以加起来是：15+30+45+60+75+90=315

clears=0fori=1to100ifi%30ifi%2=1s=s+iendifendifendfor"1至100之间非3的倍数的所有奇数之和为：",s

1到500之间所有既是7的倍数,又是偶数的数字,就是其间所有14的倍数：vari:integer;begini:=14;repeatwrite(i,'');i:=i+14;untili>500;wri

1+3+...+99=(1+99)*50/2=2500

DimIAsInteger'循环引用变量DimSum3AsInteger'存储3的倍数的和DimSum7AsInteger'存储7的倍数的和ForI=1To100'求3的倍数的和IfIMod3=0Th

先把1到200所有的数加起来1+2+...+200=20100把1到200中所有是2的倍数的数,即偶数加起来.2+4+..+200=10100把1到200中所有是3的倍数的数加起来.3+6+..+19

5+10+15+.+85+90+95+100这是一个等差数列,公差5,20项,（5+100）×20÷2=1050

subbeisu()dimbeisu3asintegerdimbeixu7asintegerbeisu3=0beisu7=0fori=1to1000ifimod3=0thenbeisu3=beisu3

//分别计算1到1000之间所有3的倍数之和和所有7的倍数之和intmain(){intsumA=0;//3的倍数的和intsumB=0;//7的倍数的和for(inti=1;i

n=3s=0dowhilen