Познаём Русский язык. Цистерна первая, полная.

10  INPUT string$
20  LET from$ = "жы"
30  LET to$ = "жи"
40  GO SUB 1000
50  LET from$ = "шы"
60  LET to$ = "ши"
70  GO SUB 1000
80  LET from$ = "чя"
90  LET to$ = "ча"
100  GO SUB 1000
110  LET from$ = "щя"
120  LET to$ = "ща"
130  GO SUB 1000
140  LET from$ = "чю"
150  LET to$ = "чу"
160  GO SUB 1000
170  LET from$ = "щю"
180  LET to$ = "щу"
190  GO SUB 1000
200  PRINT string$
300  STOP
1000  LET lenstr = LEN string$
1010  LET lenfrm = LEN from$
1020  FOR n = 0 TO lenstr
1030  IF string$(n TO n+lenfrm) = $from THEN LET string$ = string$(TO n) + to$ + string$(n+lenfrm TO)
1040  NEXT n
1050  RETURN

Во второй полной цистерне я научу вас, как писать частицу «не» отдельно от глаголов :)