编写一个程序,找出被整除的

30n+1316191121151181211241271301

dimii=0forj=100to999ifjmod3=0thenif(j-6)mod10=0theni=i+1endifendifnext没有编译运行LZ自己试试

#includevoidmain(){intx,i=0;for(x=106;x

画图略复杂,算法可以这么设计：若从1遍历到1000的话,时间复杂度为1000;比较简便的算法是计算intn=1000/7,这个结果应该是142;然后用i循环从1到n,依次输出7*i即可,这样复杂度只有

inputaif(amod4)=0and(amod100)>0thenprint"是闰年"elseif（amod400）=0thenprint"是润年"elseprint"不是闰年"endifendi

inputaif((amod4)=0and(amod100)>0)or(amod400)=0thenprint"是闰年"elseprint"不是闰年"再问：mod是什么再答：mod是求余数，即4mod

可能是太简单了,难得有人回读了,网上一大堆.我手写,没调试：dimy%onerrorgotoline1y=inputbox("输入年份：")'input-inputboxif((ymod4)=0and

inputaif((amod4)=0and(amod100)>0)or(amod400)=0thenprint"是闰年"elseprint"不是闰年"你反着用应该行吧.

inputn;if(nmod4=0)and(nmod100)0thenprint('yes')elseifnmod400=0thenprint('yes')elsewriteln('no');endi

//c++#includeusingnamespacestd;intmain(){intyear;cin>>year;if((year%400==0)||((year%4==0)&&(year%

inputaif((amod4)=0and(amod100)>0)or(amod400)=0thenprint"是闰年"elseprint"不是闰年"你反着用应该行吧.这样可以么?

//这样就ok了,刚写的code,测试通过,如果有疑问,欢迎交流#include<iostream>using namespace std;int main(

SubMain()MsgBoxFunc(100,2,5)'按照要求写的例子EndSubRem参数(最大值,被整除的数的数组)FunctionFunc(n&,ParamArrayx())Dimi&,b&

Rem语言：VisualBasic6.0SubMain()'开始i=1DoWhilei再问：程序框图

FunctionisRun(lYearAsLong)AsBooleanIflYearMod400=0ThenisRun=TrueElseIf((lYearMod4=0)And(lYearMod1000

oolfun(inti)//判断i{if(i%3==0)returntrue;returnfalse;}

所有数位和：比如898=8+9+8=25,能被5整除自身能被三整除,比如111,111/3=37所有数位和能被5整除并且自身能被3整除的,比如555（ps：其实自身能被3整除的数,所有数位和也能被3整

datasegmentvaldb100dup(0)codesegmentassumecs:codeds:datastart:movax,datamovds,axleasi,valmovbx,1movc

Rem语言：VisualBasic6.0SubMain() '开始 i=1 DoWhilei<=1000   Ifimod7=

main(){intn;scanf("%d",&n);if(n%3==0&&n%5==0)printf("能整除\n");}追问：输不了汉字啊?回答：有的环境是不能输入汉字的