RosettaCodeData/Task/A+B/Sinclair-ZX81-BASIC/a+b-1.basic
2023-07-01 13:44:08 -04:00

6 lines
117 B
Text

10 INPUT A$
20 LET I=1
30 IF A$(I)=" " THEN GOTO 60
40 LET I=I+1
50 GOTO 30
60 PRINT VAL A$( TO I-1)+VAL A$(I+1 TO )