CLEAR P = 0 FOR N = 1 TO 49 IF N>10 EXIT ENDIF IF MOD (N,2) = 0 P = P+N ENDIF ENDFOR "P=" ,P RETU
CLEAR P = 0 FOR N = 1 TO 49 IF N>10 EXIT ENDIF IF MOD (N,2) = 0 P = P+N ENDIF ENDFOR "P=" ,P RETU
这个程序的意义和算法是什么?
这个程序的意义和算法是什么?
数学人气:983 ℃时间:2020-02-01 11:26:38
优质解答
CLEARP = 0 FOR N = 1 TO 49 IF N>10 EXIT ENDIF IF MOD (N,2) = 0 P = P+N ENDIF ENDFOR "P=" ,P RETU求10以内(含10)的偶数和算法就是从1开始逐个判断每个数是否超过10,如果超过就结束,然后判断是否为偶数,如果为...
我来回答
类似推荐
- VFP:set talk off clear s=0 for m=3 to 7 n=2 do while n
- clear n=0 for i=2 to 1000 k=i*i m=len(alltrim(str(i))) if (k-i)%(10^m)=0 then n=n+1 endif endfor n
- 写出运行结果:s=o FOR I=2 TO 200 STEP 2 S=S+I "I=",I IF S>10 EXIT ENDIF ENDFOR "S=",S
- set talk off clear for W=100to 200 prime=.t. for I=2to W-1 if mod(W,I)=0 prime=.f. exit endif enddo
- SET TALK OFF CLEAR FOR I=1 TO 20 FOR J=1 TO 33 FOR K=(100-I*5-J*3)*3 IF I=J=K=100 I,J,K ENDIF ENDFO
猜你喜欢
- 1OE,OE为 圆O的半径,并与弦AB分别交予C,D两点,且AC=BD,求证弧AE=弧BF
- 21/15=1/( )+1/( )+1/( )+1/( )分母互不相同,请说明解题思路,
- 3问天气的几个用法
- 4已知代数ax的5次方加bx的3次方 加3x加c,当x=0时,该代数式的值为-1.
- 5一项工程甲单独完成需要9天乙单独完成需要12天若甲乙先做3天后佳因故离开问还需要多少天能完成这项工程?
- 6电梯顶部的弹簧秤上挂着一个质量为2kg的物体,开始电梯以2m/s2的加速度竖直向上做匀加速运动,然后电梯以
- 7小明和小亮从学校步行到图书馆小明用了十分钟响亮用了十二分钟小明和小亮所用的时间比是多少速度比是多少
- 8麦哲伦环球航行经过了哪三个大洲或大洋
- 9一个数由8个百万、5个万、6个千和2个百组成,这个数写作(),把它改写成以万为对我的数是()万.
- 10在括号里填上最简分数 25秒=( )分 30厘米=( )米?250千