题目
二、 编写一个VB函数过程,用以判断一个数是奇数还是偶数
提问时间:2021-01-10
答案
Dim n As Integer
Private Sub Form_Click()
If n / 2 = 0 Then
Print "n是偶数"
Else
Print "n是奇数"
End If
End Sub
Private Sub Form_Load()
n = InputBox("请输入整数:")
End Sub
Private Sub Form_Click()
If n / 2 = 0 Then
Print "n是偶数"
Else
Print "n是奇数"
End If
End Sub
Private Sub Form_Load()
n = InputBox("请输入整数:")
End Sub
举一反三
已知函数f(x)=x,g(x)=alnx,a∈R.若曲线y=f(x)与曲线y=g(x)相交,且在交点处有相同的切线,求a的值和该切线方程.
我想写一篇关于奥巴马的演讲的文章,写哪一篇好呢?为什么好
奥巴马演讲不用看稿子.为什么中国领导演讲要看?
想找英语初三上学期的首字母填空练习……
英语翻译
最新试题
热门考点
- 1My friend invited me to have ______ dinner with his family last Sunday.A.a B.an C.the D.不填
- 2在△ABC中角ABC所对的边分别为abc①若c=2,C=π/3且△ABC的面积S=√3求a,b的值②若sinC+sin(B-A)=sin2A判断三角形形状
- 31:甲、乙两人分别从A、B两地同时出发相向而行,匀速前进.如果每人按一定的速度前进,则4小时相遇;如果每人各自都比原计划每小时少走1千米,则5小时相遇.那么A、B相距多少千米?
- 45-离问题结束还有 14 天 23 小时
- 5There are some people in life rub shoulders with us,and did not have time to meet; met,but it was to
- 6如图,一个正方形由四个相同的小长方形组成,如果每个小长方形的周长为25,那么正方形的面积为_.
- 7乒乓球瘪了放在热水中又还原了
- 8用分词适当形式填空
- 9∫cos^5 x sinx dx ,设t=cosx,则dt=-sinxdx,求用换元法把x换元成t后得出的积分公式的(换元步骤)
- 10急,急,急,妇女是待在家照顾孩子做家务还是在外工作.英语辩论