输出100-1000之间能被37整除的数.-搜答案-灵鹊做题网

#includevoidmain(){inti;for(i=1;i

111,148,185,222,259,296,333,370,407,444,481,518,555,592,629,666,703,740,777,814,851,888,925,962,999.

PrivateSubCommand1_Click()Fori=1000To2000IfiMod17=0ThenPrintiNextiEndSubPrivateFunctionMax(ArrAsVari

我简单写了一个应该符合你的要求：publicclasstests{publicstaticvoidmain(String[]args){intn=0;for(inti=0;i

程序如下：main(){inti;for(i=1;i

#includevoidmain(){inti;for(i=102;i

//C#代码privatevoidForm1_Load(objectsender,EventArgse){//取出符合条件的数Listnums=newList();for(inti=100;i

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

/>vararr=[];//存放结果varnum=1;//初始变量while(num再问：用while循环嘛！我看不懂，表示有鸭梨再答：这就是while循环啊

inta3=0,a7=0,a37=0;for(inti=1;i

PrivateSubForm_Click()Dimx1%,x2%,count%count=0Fori=1To100x1=iMod5x2=iMod7Ifx1=0Andx2=0ThenPrinti;End

for(inti=100;i

publicstaticvoidmain(String[]args){for(inti=0;i

#includevoidmain(){inti;for(i=1;i

#includevoidmain(){inti,n=0;for(i=100;i

在excel中A1到A200输入100-300B1=if（mod（A1,21）=0,A1,0）然后下拉B1至B200则能被3和7同时整除的数在Bn中输出,不能的输出0在求和就行了找出的数有105126

Fori=100To999IfiMod10=3AndiMod7=0ThenPrintiEndIfNexti

最简单的做法：#includevoidmain(){inti;for(i=1000;i

intsum=0;for(inti=1;i

Private Sub Command1_Click() Dim j As Long, x&n