Qbasic题 随机产生20个两位整数,然后统计输出偶数的个数请把步数讲一下

来源:学生作业帮助网 编辑:作业帮 时间:2024/11/17 18:35:34
Qbasic题 随机产生20个两位整数,然后统计输出偶数的个数请把步数讲一下
xPJPY&Vc'&bR [YI/IJ T|EQ*"5TkҤ (]Ws3w\-5t770Wht\y6 68qy>ig'{2|Gaj$vښ[ďwD~ 0nYc;>nLezD3:ų4a-,r8D)L(6Wt^*B[,ۦ 8bnxf0dچnYZY'6$kʦ RUUIA'2T*("pտCC+ (IGFXU3+Y,J/fA[ 74PrH 3x-

Qbasic题 随机产生20个两位整数,然后统计输出偶数的个数请把步数讲一下
Qbasic题 随机产生20个两位整数,然后统计输出偶数的个数
请把步数讲一下

Qbasic题 随机产生20个两位整数,然后统计输出偶数的个数请把步数讲一下
cls
randomize timer
dim a(20)
for i=1 to 20
a(i)=int(rnd*90+10)
print a(i)
if a(i) mod 2=0 then s=s+1
next i
print s
end

CLS
RANDOMIZE TIMER
DIM A(20)
FOR I= 1 TO 20
A(I)=INT (RND(1)*90+10)
PRINT A(I);
IF A(I)\2=A(I)/2 THEN N=N+1
NEXT I
PRINT N
END