level 5
xuehuagao168
楼主
求(k*10+3)*6528=(3*10+k)*8256
gvbasic过程
10 k=1
20 if (k*10+3)*6528=(3*10+k)*8256 then 50
30 k=k+1
40 goto 20
50 PRINT "k=";k
END
RFO-BASIC过程
k=1
loop:
if (k*10+3)*6528=(3*10+k)*8256 then print k
k=k+1
goto loop
PRINT "k=";k
END
2015年08月19日 11点08分
1
gvbasic过程
10 k=1
20 if (k*10+3)*6528=(3*10+k)*8256 then 50
30 k=k+1
40 goto 20
50 PRINT "k=";k
END
RFO-BASIC过程
k=1
loop:
if (k*10+3)*6528=(3*10+k)*8256 then print k
k=k+1
goto loop
PRINT "k=";k
END