qbasic编程n进制转m进制

1.输入M和N
2.输入一个数X（N进制或M进制）
然后
I=0
DO
R=X MOD M&N
S=S+R*M&N^I
I=I+1
X=X\M&N
LOOP UNTIL X=0

先转成十进制（用幂展开）
再转成m进制（除m取余）