用VB编写程序输出1~100之间不能被3整除的数,并统计其个数.
题目
用VB编写程序输出1~100之间不能被3整除的数,并统计其个数.
答案
Private Sub Command1_Click()Dim i As IntegerDim n As Integern = 0For i = 1 To 100If i Mod 3 = 0 Thenn = n + 1Print n; iEnd IfNextPrint "总共" & n & "个"End SubPrivate Sub Form_Load()Me.WindowState = 2...
举一反三
已知函数f(x)=x,g(x)=alnx,a∈R.若曲线y=f(x)与曲线y=g(x)相交,且在交点处有相同的切线,求a的值和该切线方程.
我想写一篇关于奥巴马的演讲的文章,写哪一篇好呢?为什么好
最新试题
热门考点