DATA ... READ
GW-Basic, utilisé par PC-Basic
Exemple de programmation
Voir aussi Lecture dans Initiation au langage Basic
Pour stocker les
constantes numériques et de chaîne auxquelles accèdent les instructions READ du
programme.
Syntaxe:
DATA Constantes
Commentaires:
les constantes sont des
constantes numériques dans n'importe quel format (virgule fixe, virgule
flottante ou nombre entier), séparées par des virgules. Aucune expression n'est
autorisée dans la liste.
Les constantes de chaîne
dans les instructions DATA doivent être entourées de guillemets doubles
uniquement si elles contiennent des virgules, des deux-points ou des espaces de
début ou de fin significatifs. Sinon, les guillemets ne sont pas nécessaires.
Les instructions DATA ne
sont pas exécutables et peuvent être placées n'importe où dans le programme. Une
instruction DATA peut contenir autant de constantes qui tiennent sur une ligne
(séparées par des virgules), et n'importe quel nombre d'instructions DATA peut
être utilisé dans un programme.
Les instructions READ
accèdent aux instructions DATA dans l'ordre (par numéro de ligne). Les données
qui y sont contenues peuvent être considérées comme une liste continue
d'éléments, quel que soit le nombre d'éléments sur une ligne ou l'emplacement
des lignes dans le programme.
Le type de variable
(numérique ou chaîne) donné dans l'instruction READ doit correspondre à la
constante correspondante dans l'instruction DATA, sinon une erreur "Type
Mismatch" se produit.
Les instructions DATA
peuvent être relues depuis le début en utilisant l'instruction RESTORE.
Exemple 1:
. . . 80 FOR I=1 TO 10 90 READ A(I) 100 NEXT I 110 DATA 3.08,5.19,3.12,3.98,4.24 120 DATA 5.08,5.55,4.00,3.16,3.37 . . .
Ce segment de programme
lit les valeurs des instructions DATA dans le tableau A. Après l'exécution, la
valeur de A(1) est 3,08, et ainsi de suite. Les instructions DATA (lignes
110-120) peuvent être placées n'importe où dans le programme ; ils peuvent même
être placés avant l'instruction READ.
Exemple 2 :
5 PRINT 10 PRINT "CITY","STATE","ZIP" 20 READ C$,S$,Z 30 DATA "DENVER,","COLORADO",80211 40 PRINT C$,S$,Z RUN CITY STATE ZIP DENVER, COLORADO 80211
Ce programme lit les données de chaîne et numériques à partir de l'instruction DATA de la ligne 30.
