Private Sub Command1_Click()
Dim n As Integer
Cls
For i = 200 To 400
If i Mod 5 = 0 Or i Mod 7 = 0 Then
n = n + 1
Print i;
If n Mod 5 = 0 Then Print
End If
Next i
Print "满足条件的数共" n "个"
End Su
Private Sub Command1_Click()
Dim n As Integer
Cls
For i = 200 To 400
If i Mod 5 = 0 Or i Mod 7 = 0 Then
n = n + 1
Print i;
If n Mod 5 = 0 Then Print
End If
Next i
Print "满足条件的数共" n "个"
End Su
最新问答: 如图是电解水实验的示意图:(1)现象确定A端接电池______;(2)A试管里产生的是______气;B试管里产生___ 如图,AB//DC//EF,BC//DE试说明∠B=∠E的原因 高中英语语法填空,A man has been put in prison after crashing his car 1、在长方形中画一条的线段,把他分成一个最大的等腰直角三角形和一个梯形,并求出这个梯形上的面积。 在空中某一位置,以大小v0的速度水平抛出一质量为m的物体,经时间t物体下落一段距离后,其速度大小仍为v0,但方向与初速度 He was afraid ______ making friends with anyone. [ “亚运有你更精彩”的英语帮我把“亚运有你更精彩”翻译成英文. 已知一个正分数n/m(m>n>o),如果分子和分母同时增加2、3……k(整数k>0)分式的值怎么样变化? 原子还原性强,则离子难失电子,则离子还原性弱 今的反义词是什么谢谢 but he has never managed to get enough money to have the chu sound和 voice区别 匀速圆周运动加速度方向相对于谁来说是变的? 已知一个圆关于直线2X+3Y—6=0对称,且经过点A(3,2),B(1,-4),求圆的方程 在四棱锥o-ABCD中,底面ABCD为菱形,oA垂直于ABCD,E为OA的中点,F为BC的中点,连接EF. 举例,一种物质可在水中迅速溶解,这种物质可能是什么 请帮我写一篇英语短文,大约10句话,用到过去完成时和过去式,写一篇日记或写一个故事 纤维素与水反应的化学方程式 (2011•高邮市模拟)列综合算式或方程计算. 要将长为60厘米,宽为45厘米,高30厘米长方形划分为表面积相等的小正方体,那么每个小正方体表面积最大