Basic 1969 г.

Глава 6 - операторы READ, DATA и RESTORE.


Глава 6

Операторы READ, DATA и RESTORE

Краткое содержание: READ, DATA, RESTORE

В некоторых предыдущих программах мы видели, что информация
или данные могут быть введены в компьютер при помощи оператора
INPUT, иногда это может быть очень утомительно, особенно если
многие данные повторяются,каждый раз при выполнении программы, вы
можете сэкономить много времени используя команды READ, DATA И
RESTORE.

10 READ А, В, С
20 PRINT А, В, С
30 DATA 10,20,30
40 STOP

Это простой способ получения выражений нз DATA списка: старт и
выполнение от начала до тех пор, пока не будет достигнут конец.
Однако вы можете использовать и программный переход для DATA
списков, используя оператор RESTORE. В этом случае используется
оператор RESTORE с указанием после него номера строки с операто-
ром DATA, и все последовательно встречающиеся в программе опера-
торы READ вводят данные подряд, Начиная с первого оператора DATA.
Вообще-то вы можете не указывать номер строки в операторе
RESTORE, и, в этом случае, указатель данных становится на первый
оператор в программе.

Попробуйте выполнить такую программу:
10 READ А, В
20 PRINT А, В
30 RESTORE 10
40 READ X, Y, Z
50 PRINT X, Y, Z
60 DATA 1,2,3
70 STOP

В этой программе переменным, вводимым в строке 10 будут
присвоены значения а»1 и В«2. Оператор RESTORE 10 сбрасывает ука-
затель данных в начальное положение, и строка 40 присвоит значе-
ния переменным X, Y, Z, начиная с первого значения в DATA, выпол-
ните программу без строки 30, и вы увидите, что из этого полу-
чится .




СОДЕРЖАНИЕ:


  Оставте Ваш отзыв:

  НИК/ИМЯ
  ПОЧТА (шифруется)
  КОД



Темы: Игры, Программное обеспечение, Пресса, Аппаратное обеспечение, Сеть, Демосцена, Люди, Программирование

Похожие статьи:
Новости - FLASH Inc.: Закончена работа над музыкальным редактором FLASH TRACKER 2 для COVOX/SOUNDRIVE.
TR-DOS - О работе с портами TR-DOS'а.
Вступление - С праздником весны.
Новости - новости от легенды музыкального творчества Mmcm from Sage.
Сеть в нашем городе - ZX-Net u ReаlNet.

В этот день...   5 мая