pascal能被3或7整除不能被21整除-搜答案-神马作文网

programcalculate(input,output);vari:integer;sum:integer;beginfori:=1to50dobeginif(imod30)and(imod40)

Sn=n(a1+an)/2先用等差数列公式求出100以内3的倍数的和然后在减去100以内21的倍数的和（21是3和7的公倍数）就得出答案100以内3的倍数有33个n=33a1=3an=99所以S33=

stringstr="";for(inti=1;i

#includemain(){inti=0;printf("100以内能被3整除的但不能被7整除的数:\n");for(i=0;i

#includeintmain(){inti;for(i=100;i

不是这样理解的,这里是说能被4整除的年份一般来说是润年,前提是不包括100整数倍(但不是400整数倍)的年份(虽然也能被4整除)比如1900年,能被4整除,但它是100的整数倍年份,所以不是润年.20

在小于等于10000的正整数中,能被2整除或能被3整除但不能被5整除的数共有5334个再问：为什么再答：2,3,5的最小公倍数是2*3*5=3010000÷30=333……10连续每30个正整数中,能

先分析一下逻辑,1到2008的自然数,先找能被2整除的数的集合设为A,在A中的数满足不能被3整除或不能被7整除中的一个条件就算满足题意.翻译成逻辑语言为：设i为一到2008中的自然数,如果i满足(i%

能被2整除的有：1000/2=500个其中能被6整除的有：[500/6]=83个能被2整除但不能被三整除的数字有：500-83=417个再问：非常遗憾的告诉你你把10000看成了1000

头文件和函数我就略了,直接代码voidmain(){inti;for(i=1;i

C语言版本如下：#includeintmain(){inti,sum=0;for(i=1;i

整除3,5,7 要PASCAL

能说具体点么?

用out参数而且这不是已经返回了吗printf("Thereare%5dnumbersmeettheneeds.",n);加一行这个直接输出个数不就好了

for（inti=100;i

最短小#includemain(){for(inti=100;i再问：哇，您还在网上挂着~~~~~~~，真不容易啊！！！！，奇怪~~~~~~再答：加班加你了再问：额，，~~~~~你在百度上班么？？？？

1到2006中能被3整除的有2006/3=668...2其中偶数有334个（因为最后一个是2004为偶数）能被7整除的有2006/7=286...4偶数有143个能被21整除的有2006/21=95.

C.5731到2006中能被3整除的有2006/3=668...2其中偶数有334个（因为最后一个是2004为偶数）能被7整除的有2006/7=286...4偶数有143个能被21整除的有2006/2

ooleanisPrint=false;for(inti=1;i

1000/5=200,1000/7=142余6,1000/35=28余20,1~1000中,能被5整除的有200个能被7整除的有142,能被35整除的有28个,∴能被5整除或能被7整除,但不能被35整

programex;varn,i:integer;//s是输入的数,i是循环变量s:longint;//统计和的变量beginreadln(N);//读入ns:=0;//s赋初值fori:=21ton