Publicidad
La información contenida en una sentencia
DATA
puede ser leída por un bucle
FOR ... NEXT.
Escriba lo siguiente:
10
FOR
n=1
TO
6
20
DATA
2.4.6.8.10.12
30 READ d
40 PRINT d
50 NEXT
n
Los dos programas anteriores han demostrado que las sentencias
DATA
pueden estar en
cualquier lugar (antes o después de la instrucción
READ).
Al ejecutar este último programa, la sentencia
READ
avanza por la lista de datos en cada
pasada por el bucle
FOR... NEXT.
Las sentencias
READ
pueden también asignar valores a variables literales. Por ejemplo,
10
FOR
a=1
TO
7
20
READ
n$
30
PRINT
n$
40 DATA ..
a ..... ante ..:·bajo "."cabe"."con..:·contra"."de..
50 NEXT
a
No siempre hay que leer las sentencias
DATA
en orden, de la primera a la última; de he
cho, podemos saltar de una sentencia
DATA
a otra mediante la orden
RESTORE.
La for
ma de esta orden es:
RESTORE
xxx
donde xxx es
el
número de la línea en que se encuentra la sentencia
DATA
que debe ser
.
leída. La orden
RESTORE
sin número de línea hace que el puntero de datos apunte hacia
la primera sentencia
DATA
del programa.
Transcriba y pruebe el siguiente programa:
10
DATA
1.2.3.4.5
20 DATA
6.7.8.9
30 GO SUB
110
40 GO SUB
110
50 GO SUB
110
60
RESTORE
20
70
GO SUB
110
80 RESTORE
90 GO SUB
110
100 STOP
110
READ a.b,c
120
PRINT a'b'c
130 PRINT
140 RETURN
Capítulo
8.
Gula de programación en +3 BASIC
76
Publicidad
