标题多位数加法运算程序

　　10 INPUT "A，B=";A$，B$
　　20 A=LEN (A$):B=LEN(B$):IF A>B THEN K=A:GOTO 35
　　30 K=B
　　35 PRINT A$;"+";B$"=";
　　400 DIM A(K)，B(K)，C(K+1)
　　50 FOR I=1 TO A:A (I)=VAL (MID$ (A$，A-I+1，1)):NEXT I
　　52 FOR I=1 TO B:B(I)=VAL (MID$(B$，B-I+1，1)):NEXT I
　　60 FOR I=1 TO K:C(I)=A(I)+B(I)+C(I):IF C(I)>=10 THEN C　 (I+1)=1:C(I)=C(I)-10
　　70 NEXT I
　　80 IF C(K+1)=0 THEN M=K:GOTO 90
　　85 M=K+1
　　90 FOR I=M TO 1 STEP-1:PRINT C(I);:NEXT I:END