能被5整除且至少有一位数字是5的所有整数的个数

有些错误,改正如下：PrivateSubCommand1_Click()DimiAsIntegerm=0i=100DoWhilei

Varn,i:integer;s:string;Beginreadln(n);Fori:=1tondoifimod3=0ThenBegin//若能被3整除str(i,s);//将i转换为字符串ifpo

建议：1,你先写一个函数用于判断能否被3整除2,接着编写一个函数用于判断是否含有数字5,具体细节如下：假设数为x,先将x对10取余,可得到个位数字（假设为m）,用m对5整除,如果不成功,再将x对100

#include<stdio.h>int main(){\x05int a,b,c;\x05int k=0;\x05for(int i=102;i&

functionisOk(n:integer):boolean;vari:integer;beginresult:=pos('5',inttostr(n))>0;end;functionmyFunc(

fori:=1to总数量dobeginwrite(a[i]:4);ifimod10=0thenwriteln;end;再问：总数量是符合要求的数的数量吗？再答：是的，把符合的数都存放在一个数组中再问：

#includeintmain(){inta,b,c;for(a=0;afor(b=0;bfor(c=0;cif(a==0&&b==0&&c==0){continue;}elseif((a+b+c)%

91个分别是：154551545775105135150153156159165195225252255258285315345351354357375405435450453456459465495

这个题目出的不太好：一个数是所有数之和,那除了这个数其他的数只能是0了!publicclassTest{publicstaticvoidsz(){intm=0,n=0,l=0,r=0;System.o

PrivateSubCommand1_Click()Dims&,i&i=2WhileiMod115OriMod173‘先找到符合条件的第一个ii=i+2WendFori=iTo5000Step374’

你少了括号了：#includeusingnamespacestd;intmain(){inti,n,j=0;cin>>n;for(i=1;i

91个

加个变量count,初始是0,当满足if条件的时候count++；跳出for循环之后输出count

设这个数个位是x,十位是y,那么x是0到9的整数,y是1到9的整数y=x-2x+10y=3ay=5b其中a,b为整数因为y是1到9的整数,且能做十位,能被5整除,所以y=5带到上式得到x=7,符合题意

vari,j,s:integer;begini:=5;s:=0;whilei0)doj:=jdiv10;if(jmod5=0)and(j>0)thens:=s+1;i:=i+5;end;writeln

#includeintmy_test(intnum){if(num

刚才手机回答,没看完题目-_-!补一下#includeintmain(){inti;for(i=1;i

clear?"1~999能被3整除且至少有一位是5的数有："fori=1to999ifi%3=0and"5"$alltrim(str(i))?iendifendfo

①末两位数应是00、04、08、12、16、20、、92、96，共25个，其中含有数字0的有7个（00、04、08、20、40、60、80），其余18个末两位都不含有数字0．②一个四位数的末两位含有数

这个不算了,那是无穷多的,光个位是5的整数有多少你就数不过来