listati da GWbasic

100 REM base3
110 CLS
120 PRINT"LEGGE SOTTOSTRINGA IN STRINGA DA POSIZIONE INDICATA"
122 PRINT"INSTR(5,PADOVANO E ROMANO,O) ";:PRINT INSTR(5,"PADOVANO E ROMANO","O")
125 PRINT"INSTR(PADOVANO E ROMANO,O) ";:PRINT INSTR("PADOVANO E ROMANO","O")
130 PRINT"PARTE INTERA DI NUMERO INT(N)......";:PRINT INT(5.3)
140 PRINT"RADICE STRINGA LEFT$(X$,2).";:PRINT LEFT$("ASIA",2)
150 PRINT"LUNGHEZZA STRINGA LEN(X$) ";:PRINT LEN("ASIA")
160 PRINT"INPUT LINEA LINE INPUT ";:LINE INPUT X$
170 PRINT"LOGARITMO NATURALE LOG(N)......";:PRINT LOG(100)
180 PRINT"TESTINA STAMPANTE LPOS(1).....";:PRINT LPOS(1)
190 PRINT"SUBSTRINGA DA INIZIO,CON LUNGHEZZA FISSATA"
195 PRINT MID$("PADOVANO",2,3)
200 PRINT"SOSTITUZIONE IN STRINGA"
210 Y$="XXXYYYZZZ":X$="AAABBBCCCDDD"
215 PRINT X$,Y$
220 MID$(X$,4,3)=Y$:MID$(X$,4)=Y$
230 PRINT X$,Y$