vb6程序(能被5整除 在0~200中)
来源:学生作业帮助网 编辑:作业帮 时间:2024/10/05 23:39:41
#includevoidmain(){inta,sum=0;for(a=1;a
30n+1316191121151181211241271301
上面犯了一个错误算被5整除的数应该÷5,他÷4了可以被2整除的数:200÷2=100个可以被3整除的数:200÷3≈66个(去尾法)可以被5整除的数200÷5=40个可以被2、3整除的数200÷(2*
#includevoidmain(){inti,sum=0;for(i=0;i
SubMain()MsgBoxFunc(100,2,5)'按照要求写的例子EndSubRem参数(最大值,被整除的数的数组)FunctionFunc(n&,ParamArrayx())Dimi&,b&
PrivateSubCommand1_Click()DimiAsInteger,nAsIntegerFori=1To3000IfiMod17=0OriMod23=0Then_n=n+1NextPrin
dim sum as longdim i as integerfor i = 2 to 1
#include<iostream.h>void main(){ int n; &nbs
for(inti=1;i再问:有没有完整一点的啊再答:这就是核心了,嵌入主程序就可以运行了因为我学得是C++输入输出有点不一样#includeusingnamespacestd;intmain(){f
-7再问:书上的答案是-6再答:Int(-4.8)*6=-30-30\9=-3Fix(-4.8)=-4-3-4=-7书上也会有错的时候,特别是教材,编写的人并不懂编程再问:-30\9=-3为什么是-3
1000之间能被2整除的数个数:1000÷2=5001000之间能被3整除的数个数:[1000÷3]=3331000之间能被5整除的数个数:1000÷5=200既能被2整除又能被3整除的数个数:[10
fori=1to100ifimod3=0orimod5=0thenlabel1=label1&i&""next
#includemain(){inti=100;for(i=100;i
cleari=0dowhilei
sum没有初始化flostsum=0
dimsum%,i%fori=1to40ifimod5=0thensum=sum+inextprintsum再问:mod什么意思啊没怎么听课不懂啊谢谢啊
分析:因为凡是被3和5整除的正整数都是15的倍数,而1000=15×66+10,因此,1000以内一共有66个这样的正整数.引入变量a表示输出的数,引入计数变量n,计数变量n可以从1~66,反复输出a
Private Sub Command1_Click() Dim j As Long, x&n
程序:n=1s=0DOIFnMOD5=0s=s+nENDIFn=n+1LOOPUNTILi>100PRINTsEND这是我按你的要求写的,恩...你自己检查下吧
#includeusingnamespacestdvoidmain(){intm,i;for(i=109;i再问:这个dowhile程序会不会