Основы автоматизированного проектирования химических производств. Миронов В.М - 156 стр.

UptoLike

ВУЗ: 

ТПУ | Томск

Составители: 

Рубрика: 

156
клавиши <Esc> , cod = 27.
Примечание: функция удобна при организации управляющих структур в
зависимости от кодов нажатых клавиш.
readm(flname, p$()) – предназначена для построчного чтения ASCII-
файла.
Имеет следующие параметры:
flname – имя файла для чтения, заключенное в кавычки;
p$() – одномерный символьный массив, элементами которого, при вы-
полнении процедуры, будут строки файла.
Примечание: Используемый в процедуре массив должен
быть объявлен
с атрибутом SHARED.
ПРИМЕР 10
Допустим существует текстовый файл "read.me", состоящий из 100
строк
DIM SHARED txt$(100)
. . . . .
CALL readm("read.me", txt$())
CLS
FOR I = 1 TO 23
LOCATE , 5: PRINT txt$(I)'распечатка первых 23 строк
NEXT
. . . .
strpr(str) – обеспечивает постраничную распечатку результатов расчета.
Параметр str - определяет количество строк, выводимых на принтер. Не-
достатком данной функции является то, что она требует записи после каждо-
го обращения к принтеру.
ПРИМЕР 11
LPRINT " РЕЗУЛЬТАТЫ РАСЧЕТА "
df = strpr(60)
LPRINT "....................."
df = strpr(60)
LPRINT "....................."
df = strpr(60)
............................……..
df = strpr(60)
LPRINT "....................."
df = strpr(60)
LPRINT "....................."
df = strpr(60)

Страницы