您好,今天小爱来为大家解答以上的问题。qbasic轻松编程相信很多小伙伴还不知道,现在让我们一起来看看吧！

1、4.clsdim a(10)print "please input num"for i = 1 to 10input a(i)next ifor j = 1 to 10max = a(j)for i = j to 10if a(i)>max then swap a(i),maxnext inext jclsfor i = 1 to 10print a(i),next iend5.clsdoinput xloop until int(x)=x and x>0if x mod 4 =0 and x mod 100<> 0 or x mod 400=0 thenprint "yes"elseprint "no"end ifend6.clsa=1:b=1print a,b,for i = 3 to 60c=a+bprint c,b=c:a=bnext iend7.CLSFOR i = 2 TO 100k = 0: t = 0DOk = k + 1FOR j = 2 TO i /2IF k j = i THEN t = t + 1: EXIT DONEXT jLOOP UNTIL k = iIF t = 0 THEN PRINT i, : y = y + 1NEXT iPRINTPRINT "all"; yEND8.clsfor i = 1 to 100randomize timera=int(rnd2)if a=1 then z=z+1if a=0 then f=f+1next iprint "zheng";zprint "fan";fend楼主选我！！！。

本文到这结束，希望上面文章对大家有所帮助。