8 lines
144 B
Text
8 lines
144 B
Text
10 INPUT a$
|
|
20 LET b$=""
|
|
30 FOR x=1 TO LEN a$
|
|
40 LET k=CODE a$(x)
|
|
50 IF k<32 OR k>164 THEN GOTO 70
|
|
60 LET b$=b$+a$(k)
|
|
70 NEXT x
|
|
80 PRINT LEN b$
|