VF编程 求出表达式S=1 22 333 4444 .... n
来源:学生作业帮助网 编辑:作业帮 时间:2024/05/21 16:30:51
clears=1input"请输入n的值:"tonfori=2tonk=(-1)^im=k/is=s+mendfor"s=1+1/2-1/3+1/4+...+1/n",s
***1-100能被3整除的所有奇数之和s=0FORi=1TO100\x05IFMOD(i,3)=0ANDMOD(i,2)0\x05\x05s=s+i\x05ENDIFENDFOR"s="+ALLTR
clears=0m=0fori=1to22m=m+is=s+mendfor?"S=1+(1+2)+(1+2+3)+…+(1+2+3+4+…+22)=",s
s=0sum=1;for(i=1;i
clears=0fori=1to10m=1forj=1toim=m*jendfors=s+mendfor?"S=1!+2!+3!+…10!=",s
SETTALKOFFS1=0S2=1FORi=1TO100IFmod(i,2)=1S1=S1+iELSES2=S2*iENDIFENDFORs1,s2再问:亲,我把上面的复制到了软件里为什么会显示“找
clears=0i=1dowhilei
x=""@2,10say"输入任意一个正整数"getxpicture"999999999999999"readlx=len(alltrim(x))lx=alltrim(str(lx))@4,14say
clears=0input"n="tonfori=1tonk=1forj=1toik=k*jendfors=s+kendfor?"s=1!+2!+3!+4!……+n!=",s
s=0k=0fori=1to100s=s+iifi%2=0k=k+iendifendfor?"s=1+2+3++100=",s?"1-100的偶数和:",k
楼上的回答当然正确,也可能用此方法.clearp=1s=0fori=1to100s=s+p*(1/i)p=-pendfor?"S=1-1/2+1/3-1/4+1/5········-1/100结果为:
(1)题程序如下:settalkoffs=0i=1dowhilei
clearallcloseallx=1:1:20;lx=length(x);fork=1:1:lxs=0;s=s+factorial(x(k));end>>ss=2.4329e+018
1.clearInput"请输入圆的半径"toc=3.14*r*2s=3.14*r*r?"圆的周长为:",c,"圆的面积为:",sreturn2.clearinput"请输入计程车公里数"towifw
^,**,都是乘幂,优先级高于乘除,求余,27-6/3%8,27-2%8,2%8余数为2,所以结果是25
#includeusingnamespacestd;intmain(intargc,char*argv[]){ints=0;inttemp=1;inti;for(i=1;i
1.input"请输入一个小于6,大于2的正整数:"tonifn=6"输入数据不符合要求,请重新运行程序再输入!"elses=0k=0dowhilk
用for循环计算inta=2;ints=0;for(inti=1;i
clearinput"请输入N的值:"tonifn%2=0k=0fori=1tonk=k+iendforelsek=1fori=1tonk=k*iendforendifs=0.5*k"s=",s
*VF编程π/4=1-1/3+1/5-1/7+.公式求πCLEARn=100000p=0FORi=1TOn\x05IFMOD(i,2)=0\x05\x05p=p-1/(2*i-1)\x05ELSE\x