编写判断一个数是否同时被17与37整除的 function过程,输出1000-2000之间所有能被17与37整除的数.
题目
编写判断一个数是否同时被17与37整除的 function过程,输出1000-2000之间所有能被17与37整除的数.
答案
Dim numDim strstr = ""For num=1000 To 2000str = str + Cal(num)NextMsgBox strFunction Cal(num)If num Mod 17 = 0 And num Mod 37 = 0 ThenCal = CStr(num) + " "End IfEnd FunctionFor循环遍历1000到2000的整数...
举一反三
已知函数f（x）=x，g（x）=alnx，a∈R．若曲线y=f（x）与曲线y=g（x）相交，且在交点处有相同的切线，求a的值和该切线方程．
我想写一篇关于奥巴马的演讲的文章,写哪一篇好呢?为什么好
最新试题
热门考点
- 阿司匹林肠溶片含量测定为什么要在水浴上加热
- 一个圆柱的侧面积是80平方厘米,底面半径是3厘米,它的体积是多少立方厘米?
- 什么是人类特有的社会活动
- 人教版五年级数学下册黄冈小状元p21答案
- 食堂本月用煤1500千克,比上月节约用煤500千克,比上月节约了百分之几?
- if(K8="2",if(G9=0,"",D9/G9),if(I9=0,"",F9/I9))
- 内质网上的核糖体和内质网是什么关系
- 格律诗的句数是固定的:八句的称为( ),四句的称为( )每句又
- My hair is longer than _______ .A.my sister B.Kate C.my brother’s D.Lucys’
- Both of us _ from China.A.comes B.come C.to come