题目
（1） 求1-1000以内所有完全平方数..
1 求1-1000以内所有完全平方数.
2 从键盘输入若干个数,以0结束,统计正数和负数的个数.
1 求1-1000以内所有完全平方数.
2 从键盘输入若干个数,以0结束,统计正数和负数的个数.
提问时间：2020-10-23
答案
Private Sub Command1_Click()Dim i%,k%For i = 1 To 1000If Int(Sqr(i)) = Sqr(i) Then Print i,:k = k + 1If k Mod 5 = 4 Then Print:k = 0NextEnd SubPrivate Sub Command2_Click()Dim OS%,JS%,m$m = InputBox("...
举一反三
已知函数f（x）=x，g（x）=alnx，a∈R．若曲线y=f（x）与曲线y=g（x）相交，且在交点处有相同的切线，求a的值和该切线方程．
我想写一篇关于奥巴马的演讲的文章,写哪一篇好呢?为什么好
奥巴马演讲不用看稿子.为什么中国领导演讲要看?
想找英语初三上学期的首字母填空练习……
英语翻译
最新试题
热门考点
- 1便民商店运来a千克大米,已经卖了6天,每天卖出b千克,余下的大米要在4天内卖完.
- 2一辆汽车从甲地开往乙地,第一小时行驶了全程的15%,第二小时行驶了全程的16.5%,第二小时比第一小时多行驶了8.1千米,甲乙两地间的公路长多少千米?
- 3Which situation is an example of bivariate data?以下有几个选项
- 4铜、铁做电极以三氯化铁做电解质的原电池的电极反应是
- 5脱氧核酸=核酸=DNA=脱氧核糖核酸?
- 6a^2-5ab+4b^2=0,因式分解
- 7_÷16=3/8=15÷_=_：24=_（用小数表示）=_（用折数表示）=_%．
- 8细的方括号怎样打出来
- 9修改病句：这次运动会生气勃勃( ) 填上合适的词：推广（ ）
- 10用带点的字仿写句子:柔和的月色立即(立即加点)洒满了我们的篱笆小院