команда RESTORE позволяет вам повторно
сделать.
команда RESTORE позволяет вам повторно считывать константы из первого опе-
ратора или любого специфицированного оператора DATA.Если вы пытаетесь реали-
зовать READ большое число раз,чем имеет констант ваша программа,это приводит
к ошибке 4 (вне данных).
Ограничения Вы не можете использовать в операторах DATA литеры с непрерывным
----------- подчеркиванием .Не пользуйтесь единичной кавычкой (') для комен-
тирования оператора DATA,поскольку Турбо-Бейсик может принять ее за послед-
ний вход ,а ваш комментарий за часть данной одной длинной строчной констан-
ты.Например:
"Кнопки","собаки" и "свиньи'список животных."
Вы можете ,однако ,безопасно использовать для этой цели :REM:
См.также READ
RESTORE
Пример 'Эта программа демонстрирует использование оператора DATA
sub ОбработкаРезультатов(СтудентаИмя$,СтудентаСредний%)
local Всего%,Бал%,i%
Всего%=0
read СтудентаИмя$
for i%=1 to 10
read Бал%
Всеге%=Всего%+Бал%
next i%
СтудентаСредний%=Всего%\10
end sub
for Студент%=1 to 3
call ОбработкаРезультатов(Симя$,Средний%)
print using "&'s средний равен ###";симя$,средний%
next Студент%
end
Ваши результаты:
DATA В.Перри,78,65,35,79,86,93,79,85,99,96
DATA П.Ватсон ,98,94,70,88,99,100,75,96,100,95
DATA М.Чикконе,65,59,75,82,56,79,82,76,69,89
Системная переменная DATE$
--------------------------
Функция DATE$ устанавливает и устанавливает системмную дату.
-------
Синтаксис DATE$=s$ (установить дату в соответствии с информацией в s$)
Forekc.ru
Рефераты, дипломы, курсовые, выпускные и квалификационные работы, диссертации, учебники, учебные пособия, лекции, методические пособия и рекомендации, программы и курсы обучения, публикации из профильных изданий