求1到100之间所有的不能被3整除的整数的和.

\x09int result = 0;\x09\x09for (int i = 100; i <&nbs

先求所有能被3整除的自然数的和200到500之间最小的为201,最大的为498中间都是隔3个能整除一次用等差数列就可以了一共(498-201)/3+1=100个(201+498）*100/2=3495

if(i==j)如果这天语句成立,那么就说明i是质数啊!也就是说如果i==j这说明if(i%j==0)break;这句一直都没执行行过（j从2一直加到i-1）,所以说明这个数是质数喽!

1加到100=50509+18+27+36+45+54+63+72+81+90+99=5945050-594=4456

1到200之间,能被3整除有=198/3=66个1到200之间,能被21整除有=189/21=9个1到200之间,能被3整除但不能被7整除的数=能被3整除-能被21整除=66-9=57个count=0

PrivateSubCommand1_Click()s=0Fori=100To200IfiMod3=0Thens=s+iEndIfNextiText1.Text=sEndSu

intsum=0;for(inti=0;i{if(i%3!=0){sum+=i;}}

*用vfp编写程序,输出100到200之间能被3整除不能被7整除的所有自然数.SETTALKOFFCLEARFORi=100TO200\x05IFMOD(i,3)=0.and.MOD(i,7)0\x0

思路是：1到100的总和减去可以被三整除的数的总和,1+2+3+……100=（1+100）*100/2=5050,3+6+9+12+……99=3*（1+2+3+……33）=3*（1+33）*33/2=

105+120+135+150+165+180+195=1050

在窗体上添加三个文本框,和一个按钮.在按钮的单击事件中写:privatesubcommand1_clickdimsumasinteger'和dimcountasinteger'个数sum=0count

100到200之间所有能被3整除的数是等差数列102,105,...,198共33个和为4950100到200之间所有能被15整除的数是等差数列105,120,...,195共7个和为1050则100

cleari=0dowhilei

在100到400之间能被3整除的数最小为102,最大为399相邻两数之间相差都为3因此一共有：（399-102）÷3+1=99个数字根据等差数列求和公式,和为：（102+399）×100÷2=2505

1000到2000之间不能被5除余3的第一数为1003后面为1008为一等差数列最后一项为19981003+1008+.+1998=200*(1003+1998)/2=3001001000到2000数

能被3整除的数字共有：1000/3=333个能被5整除的数字共有：1000/5=200个能被7整除的数字共有：1000/7=142能同时被7和5整除的数：1000/35=28能同时被7和3整除的数：1

100到200之前能被3整除的数满足数列：a1=102an=102+3n100到200间最大可被3整除的数字是198an=102+3n=198解得n=32该数列为等差数列,数列求和Sn=（a1+an）

S=0i=1DOIFi\3i/3THENS=S+ii=i+1ENDIFLOOPUNTILi>100END用QB大概是这样.

一共有（399-102）/3+1=100个可以被3整除的数所以有100个102+3*（0+1+2+3...+99）所以102*100+3*50*99=25050

clearfori=3to100forj=2toi-1ifi%j=0EXITENDIFendfIFj>=iendiendf我运行过了.