vb输出1到100间奇数之和.
来源:学生作业帮助网 编辑:作业帮 时间:2024/05/20 16:59:20
#include<stdio.h>intmain(){ printf("%d",count(100)); &nb
Private Sub Command1_Click() Dim i As Integer &
dimiaslongdimsumaslongsum=0fori=1to100step2sum=sum+inextiprintsum
intjishuhe=0;intoushuhe=0;for(inti=1;i
DimiasInteger,jasInteger,oasIntegerj=0o=0Fori=1To100Step2j=j+io=o+(i+1)NextDebug.print"100以内的奇数和:"&j
PrivateSubCommand1_Click()Dim奇数和AsLongDim偶数和AsLongDim你输入的数AsIntegerDimiAsLong你输入的数=InputBox("请输入一个整数
#includeintmain(){inti,aim=0;for(i=1;i再问:呵呵,谢谢,我要的是输出有多少个奇数,不是奇数的交总和.请问这该怎么写?再答:我写的就是多少个奇数啊,你运行试试再问:
publicclassdemo{/***@paramargs*/publicstaticvoidmain(String[]args){inta=0,b=0;for(inti=1;i
解法1:#includeintF1(){return50*(1+99)/2;}intF2(){return50*(2+100)/2;}voidmain(){printf("Oddnumbersum=%
用C++语言么?那应该很简单for(inti=1;icout
for(i=1;i
2500再问:过程,谢谢再答:1+3+5+...+9999+97+95+...+1(1+99)×50÷2=2500
#include"stdio.h"intmain(){intcountou,countji=0;inti=0;for(i=1;i
#includevoidmain(){intn=10;inti;intjishu=0,oushu=0;for(i=1;i
intsum=1;for(int1=1;i再问:是不是我把这全部抄上就可以了?还是我还得把数字加进去自己算???再答:直接输出的,你用什么语言的再问:我一点都不懂这个,没学过。那我就直接按你的抄上了,
在窗口上建立一个按钮:FunctionTotal(Num1,Num2)AsString'Num1为奇数和'Num2为偶数和Fori=1To100IfiMod20ThenNum1=Num1+iElseN
sum=0fori=1to100if(imod3)thensum=sum+inextiprintsum
你交作业啊,这么简单的问题,还好意思来这问.自己稍微动动脑子好不好,懒成这样,有没有点血性?!
Private Sub Command1_Click() Cls Dim r(
PrivateSubForm_Click()Dima(30)AsIntegerDimiAsIntegerRandomizeFori=1To30a(i)=Int(100*Rnd)NextiFori=1T