CLS DIM N AS STRING * 2 NO$ = "NO" A$ = "(": B$ = ")": C$ = "[": D$ = "]" OPEN "INPUT.TXT" FOR INPUT AS #1 OPEN "OUTPUT.TXT" FOR OUTPUT AS #2 DO WHILE (EOF(1)) INPUT #1, N IF N = A$ + A$ THEN WRITE #2, NO$ IF N = A$ THEN WRITE #2, A$ + B$ IF N = B$ THEN WRITE #2, A$ + B$ IF N = C$ THEN WRITE #2, C$ + D$ IF N = D$ THEN WRITE #2, A$ + B$ LOOP CLOSE #2 CLOSE #1 SYSTEM