计算800到2016之间所有能被11
来源:学生作业帮助网 编辑:作业帮 时间:2024/09/22 04:36:55
你一点都不做?做一做大家给你修改才是正途
fori=1:10a(i)=i^0.5;b(i)=i^2;c(i)=i^(1/3);end
PublicSubqqqqq()DimiAsIntegerDimjAsIntegerDimsAsIntegerDimCAsBooleans=0Fori=2To100C=FalseForj=2Toi-1
现在命令窗口输入:modifycommandqh让后在弹出了窗口中输入:clearstore0tosfori=8to100ifmod(i,8)=0s=s+iendifendfor"10到100之间的所
dimiaslongdimsumaslongsum=0fori=1to100step2sum=sum+inextiprintsum
这个简单啊!#includemain(){intsum=0,n=0;scanf("%d",&n);for(inti=0;i
#includevoidmain(){\x09inti,s=0;\x09for(i=800;i
判断一个整数m是否为素数,只需用2~根号m之间的每一个整数去除,如果都不能被整除,那么m就是一个素数.再问:为什么要从2——根号M之间去整除,而不是2——M之间,不是求所有素数的平方根之和吗,不应该是
第一个是正确的我来解释doublefun(intn){intm,k,i;doubles=0.0;for(m=3;m
#includeintmain(void){inti,sum;sum=0;for(i=1;i
设置了没5个换行PrivateSubBcompute_Click()t=0Fori=1To12260If(iMod3=0)And(iMod7=0)And(iMod9=0)ThenTresult.Tex
#includevoidmain(){inti,sum=0;for(i=3;i
SETTALKOFF**关掉人机对话,就是屏幕不显示运行结果N=2**赋值语句S=0**赋值语句DOWHILEN
1+3+...+99=(1+99)*50/2=2500
1003到1998,200个(1003+1998)*500/2=750250
inti,sum=0;for(i=1000;i
n=3s=0dowhilen
intfoo(){//只可能有奇inti=(7*13*5);//455intsum=0;while(i
dimiasintegerdimaasintegera=3*7*9fori=1to13230ifimoda=0then'这里你要对i干什么?,我就打印到立即窗口上debug.printiendifne
楼上推荐的程序有个问题.3*7*9应该写成7*9,否则会漏掉63dimiasintegerdimjasintegerdimSasLongS=0fori=1to13230ifimodj=0thenS=S