vb键盘输出正整数,编程输出改数值二进制
1个回答
关注
![]()
展开全部
亲亲，你好
其中70是5、7公倍数中被3除余1的数；21是3、7公倍中被5除余1的数；15是3、5公倍数中被7除余1的数。105则是3、5、7的最小公倍数。如果得数较大，可以连续减去105。 依此，上题可列式为： 70×2＋21×3+15×2=233 ，233-105-105=23
其中70是5、7公倍数中被3除余1的数；21是3、7公倍中被5除余1的数；15是3、5公倍数中被7除余1的数。105则是3、5、7的最小公倍数。如果得数较大，可以连续减去105。 依此，上题可列式为： 70×2＋21×3+15×2=233 ，233-105-105=23
咨询记录 · 回答于2022-11-16
vb键盘输出正整数,编程输出改数值二进制
亲亲，你好rivate Sub Command1_Click()Dim shi As IntegerDim er As StringDim s As Integershi = Text1Dos = shi Mod 2er = s & ershi = shi \ 2Loop While shi > 0Print "转换为二进制数为：" & erEnd Sub
rivate Sub Command1_Click()Dim shi As IntegerDim er As StringDim s As Integershi = Text1Dos = shi Mod 2er = s & ershi = shi \ 2Loop While shi > 0Print "转换为二进制数为：" & erEnd Sub
VB题“物不知数”出自《孙子算经》。题目为:今有物不知其数，三三数之剩二，五五数之剩三，七七数之剩二，问物几何?”。意思是说有一些物品，不知道有多少个，3个3个数的话，还多出2个;5个5个数则多出3个;7个7个数也会多出2个。现假设物品总数不超过n(n<=1000)，请编程计算满足条件的物品个数并输出。
很急用
亲亲，你好其中70是5、7公倍数中被3除余1的数；21是3、7公倍中被5除余1的数；15是3、5公倍数中被7除余1的数。105则是3、5、7的最小公倍数。如果得数较大，可以连续减去105。 依此，上题可列式为： 70×2＋21×3+15×2=233 ，233-105-105=23
其中70是5、7公倍数中被3除余1的数；21是3、7公倍中被5除余1的数；15是3、5公倍数中被7除余1的数。105则是3、5、7的最小公倍数。如果得数较大，可以连续减去105。 依此，上题可列式为： 70×2＋21×3+15×2=233 ，233-105-105=23
是vb编程题啊
亲亲，首先要明白算法，即将十进制转换成二进制的算法。
下图是具体的数学算法。
VB中第一步：输入一个10进制正整数a，将a除以2，记录余数r。
第二步：若x除以2的商为0，则逆序输出每一次的余数(即10进制正整数x的2进制数)若x除以2的商不为0，则将商结果作为下一次的被除数a，转向执行第一步。
运行，输入检验即可。
已赞过
评论
收起
你对这个回答的评价是？
