<<
>>

3.9. РУКОВОДСТВО ПОЛЬЗОВАТЕЛЮ ТУРБО-ПАСКАЛЯ

СТАНДАРТНЫЕ ПРОЦЕДУРЫ И ФУНКЦИИ

Принятые обозначения:

type -любой тип;

string - любой строковый тип;

file -любой файловый тип;

scalar - любой простой тип;

pointer -любой ссылочный тип.

Замечание: если в списке параметров не указан спецификатор типа, то в качестве данного параметра процедура допускает параметр любого типа; в некоторых процедурах допускаются несколько вариантов заголовков процедур.

ПРОЦЕДУРЫ ВВОДА-ВЫВОДА

Процедура Read

Read(var F:file of type; var v:type);

Read(var F:text; var I':intnger);

Read(var F:text; var R:real);

Read(var F:text; var C:char);

Read(var F:text; var S:string);

где F - имя переменной файлового типа, a var I,R,C,S - одна или несколько переменных, совпадающих по типу с типом элементов файла.

Процедура Readln

Readln(var F:text; var varl,var2,...varN);

Readln(var varl ,var2,...varN);

Readln(var F:text);

Readln;

где F - имя переменной типа text, a varl...varN - переменные типа Char. Если опущено имя файла, то по умолчанию принимается имя типа INPUT.

Если опущея список переменных, то происходит переход на другую строку.

Процедура Write

Write(var F:file of type; var v:type);

Write(var F:text; var I:integer);

Write(var F:text; var B:boolean);

Write(var F:text; var C:char);

Write(var F:text; var S:string).

Процедура Writeln

Writeln(var F:text; var varl ,var2,... varN);

Writeln(var var varl ,var2,... varN);

Writeln(var F:text);

Writeln.

СТАНДАРТНЫЕ ФУНКЦИИ

Функции арифметические

Abs(x); Arctan (x); Cos (x); Exp (x); Ln (x); Sin (x); Sqr (x); Sqrt (x)

имеют стандартный смысл. Функция

fruc(R:Real):Real;fruc(I:Integer):Real

возвращает значение дробной части своего аргумента.

Функция

int (R:real):real; int (I:integer):real;

возвращает значение целой части своего аргумента.

Функции скалярные

Odd(x); Pred(x); Succ(x)

имеют стандартный смысл.

Функции преобразования

Chr (x); Ord (x); Round (x); Trunc (x) имеют стандартный смысл.

СТРОКОВЫЕ ПРОЦЕДУРЫ И ФУНКЦИИ

Процедура Delete(var S:Strina;Pos, Len: Integer) убирает из строки S Len символов, начиная с Pos. Если Len больше длины S, то ничего не происходит. Если Pos+Len больше длины строки, то удаляются все символы до конца строки.

Процедура Insert(S:String; var D:String;Pos:Integer) вставляет строку S в строку D перед символом с номером Pos. Если Pos больше длины D, то S и D соединяются. Если длина результата при этом больше максимальной длины D, то в D записываются только самые левые символы.

Процедура Str(I:Integer; var S: String); Str(R:Real; var S:String) преобразует I или R из числа в строку и записывает эту строку в S, причем R и I могут записываться формально, т.е. как в процедурах Write и Writeln.

Процедура Val(S:String; var R:Real; var P:Integer); Val(S:String; var I,P:Integer) преобразует строковую переменную S в число (тип зависит от типа переменной I или R соответственно). Если в строке S ошибок нет. то Р равно 0, иначе значение R (или I) не определено, а Р присваивается номер первого ошибочного символа.

Функция Concat(Sl,S2,....Sn:string):String возвращает строку, полученную конкатенацией строк Sl,...,Sn. Если длина результата больше 255, то возникает ошибка времени выполнения.

Функция Copy(S:String; Pos,Len:Integer):String возвращает строку, полученную из Len символов строки S, начиная с позиции Pos. Если Pos больше, чем длина строки S, то возвращается пустая строка. Если Pos+Len больше, чем длина строки S, то возвращаются только символы, принадлежащие строке S.

Функция Length(S:Strina):Integer возвращает длину строки S.

Функция Pos(Pattern,Sourse:String):Integer возвращает номер символа, начиная с которого Pattern входит в Sourse. Если вхождения нет, то возвращается 0.

ПРОЦЕДУРЫ И ФУНКЦИИ ДЛЯ РАБОТЫ С ФАЙЛАМИ

Процедура Assign(var F:File: Name:String); Name - имя файла на диске, F – имя файловой переменной.

После выполнения этой процедуры Name и F отождествляются. Assign не должна применяться к файлу, находящемуся в употреблении.

Процедура BlockRead(var F:File; var Dest:Type; Num:Integer)

F -нетипизируемый файл, Dest -переменная,

Num - количество 128-баитных записей, которые должны быть перенесены из дискового файла в переменную.

Процедура BlocKWrite(var F:File; var Dest:Type; Num:Integer) I Num - количество 128-баитных записей, которые должны быть перенесены из переменной в дисковый файл.

Процедура Chain(var F:File) активизирует CHN-файл, с которым предварительной процедурой Assign было отождествлено имя F.

Процедура Close(var F:File); дисковый файл, отождествленный с переменной F, закрывается и в директорию диска вносятся необходимые изменения.

Процедура Erase(var F:File); дисковый файл, отождествленный с переменной F, уничтожается.

Процедура Execute(var F:File) загружает и выполняет файл с диска, с которым предварительно процедурой Assign было отождествлено имя F.

Процедура Rename(var F:File; Name:String); дисковому файлу, отождествленному с переменной F, присваивается новое имя Name. Rename не должна применяться к уже открытому файлу.

Процедура Reset(var F:File) открывает файл F для чтения и ставит указатель на начало файла.

Процедура Rewrite(var F:File) открывает файл F для записи, чистит его и ставит указатель на начало файла.

Процедура Seek(var F:File of type; Pos:Integer) устанавливает указатель файла F на Pos элемент файла.

Процедура Flush(var F:File) очищает буфер дискового файла, отождествленного с переменной F. Гарантирует, что следующая операция чтения будет произведена непосредственно с диска. Должна применяться к уже закрытым файлам.

Функция Eof(var F;File):boolean возвращает TRUE, если найден конец файла.

Функция Eoln(var F:Text):boolean возвращает TRUE, если найден конец строки или конец файла F.

Функция Filepos(var: F: File of Type):Integer; Filepos(var: F:File):Integer возвращает текущую позицию указателя файла.

Функция Filesize(var: F: File ofType):Integer; Filesize(var: F:File):Integer возвращает текущее количество элементов файла.

ПРОЦЕДУРЫ И ФУНКЦИИ ДЛЯ РАБОТЫ СО ССЫЛОЧНЫМИ СТРУКТУРАМИ

Процедура Getmem(var P:Pointer; I:Integer) отводит под область памяти, на которую будет ссылаться переменная Р, 1 байт памяти.

Процедура Mark(var P:Pointer) запоминает текущий указатель «кучи» в переменной Р.

Процедура New(var P:Pointer) отводит место в памяти под переменную того типа, на который указывает Р.

Процедура Release(var P.Pointer) ставит указатель «кучи» на значение переменной Р. Переменная Р должна быть предварительно обработана процедурой Mark. Уничтожаются все динамические переменные, расположенные в памяти после последнего вызова процедуры Mark.

Функция MemAvai:Integer возвращает размер доступной для динамических переменных памяти.

Функция Ord(P:Pointer):Integer возвращает адрес переменной ссылочного типа Р.

Функция Ptr(I:Integer):Rointer возвращает ссылку на адрес памяти I.

ПРОЦЕДУРЫ ДЛЯ РАБОТЫ С ТЕКСТОВЫМ ЭКРАНОМ

Процедура CrtExit - выдача на экран строки сброса экрана, определенной в инсталляторе.

Процедура Crtlnit - выдача на экран строки инициализации экрана, определенной в инсталляторе.

Процедура CIrEol уничтожает символы строки от курсора до крайнего правого символа без перемещения курсора.

Процедура CIrScr очищает экран.

Процедура DelLine - удаление строки, на которой находится курсор, и сдвиг всех строк, находящихся ниже этой строки, на одну вверх.

Процедура GotoXY (X,Y:Integer) - позиционирование курсора по координатам XnY.

Процедура InsLine - вставка пустой строки на место курсора и сдвиг всех строк, находящихся под этой строкой на одну вниз.

ПРОЧИЕ ПРОЦЕДУРЫ И ФУНКЦИИ

Процедура Bdos(func,param:Integer) - вызов функции Bdos с номером func, которая заносится в регистр С, и параметром param, который заносится в регистровую пару DE.

Процедура bios (func,param:Integer) - вызов функции Bios с номером func и параметром param.

который заносится в регистровую пару ВС.

Процедура Delay (Ms:Integer) - задержка программы на Ms миллисекунд.

Процедура FillChar(var dest; length:Integer;data:Char); FillChar(var dest;

length:Integer;data:Byte) - заполнение length байт памяти величиной data. Начало участка памяти - адрес переменной dest.

Процедура Halt - аварийный выход из программы.

Процедура Move(var sourse.dest:length:Integer) - пересылка length байт, расположенных в памяти, начиная с первого байта переменной sourse, в участок памяти длины length, начинающийся с первого байта переменной dest.

Процедура Randomise- инициализация генератора случайных чисел.

Функция Addr(var variable):Integer; Addr():Integer;

Addr():Integer возвращает адрес первого байта своего аргумента.

Функция Bdos(funk,param:Integer):Byte аналогична соответствующей процедуре. Возвращает значение регистра А.

Функция BdosHL(funk,param:Integer):Integer аналогична функции Bdos. Возвращает значение регистровой пары HL.

Функция Bios(funk, param :Integer):Byte аналогична соответствующей процедуре. Возвращает значение регистра А.

Функция BiosHL(func.param:Integer):Integer аналогична функции Bios. Возвращает значение регистровой пары HL.

Функция Hi(I:Integer):Integer возвращает число, младший байт которого содержит старший байт параметра. Старший байт результата равен 0.

Функция IOresult:Integer работает после директивы компилятору $1-. Значение 0 соответствует отсутствию любой ошибки ввода-вывода. В противном случае возвращается произвольное ненулевое число.

Функция KeyPresscd:Boolean возвращает TRUE, если нажата любая клавиша на клавиатуре, и FALSE в противном случае.

Функция Lo(I:Integer):Integer возвращает число, младший байт которого содержит младший байт параметра. Старший байт результата равен 0.

Функция Random(I:Integer):Integer; Random:Real возвращает случайное число. Для первого варианта вызова это число лежит в интервале от 0 до 1, для второго -от 0 до 1.

Функция Size0f(var variable):Integer; Size0f():Integer возвращает размер (в байтах) своего аргумента.

Функция Swap(I:Integer):Integer возвращает число, у которого по сравнению с аргументом поменялись местами первый и второй байты.

Функция UpCase(Ch:Char):Char возвращает верхний регистр данного символа. Если такового нет, то возвращается аргумент.

Функция ParamCount:Integer; возвращает число параметров в строке вызова СОМ-файла.

Функция ParamStr(n:Integer):String[14]; возвращает n-параметр из строки вызова СОМ-файла.

Процедура Exit - выполнение этой процедуры эквивалентно передачи управления на последний END процедуры, функции или основной программы, где выполнена процедура Exit.

<< | >>
Источник: А.В.Могилев, Н.И.Пак, Е.К.Хённер. Информатика. 2016

Еще по теме 3.9. РУКОВОДСТВО ПОЛЬЗОВАТЕЛЮ ТУРБО-ПАСКАЛЯ:

  1. Статья 833. Обязанности пользователя
  2. Статья 1123. Ответственность правообладателя по требованиям, которые предъявляются к пользователю
  3. Статья 1121. Обязанности пользователя
  4. Статья 500. Право предшествующего пользователя на торговую марку
  5. Статья 480. Право предшествующего пользователя на компонование интегральной микросхемы
  6. Статья 470. Право предшествующего пользователя на изобретение, полезную модель, промышленный образец
  7. Статья 1124. Право пользователя на заключение договора коммерческой концессии на новый срок
  8. Руководство
  9. Руководство и позиции
  10. Что такое руководство?
  11. РУКОВОДСТВО В ПУТЕШЕСТВИИ
  12. СТИЛЬ РУКОВОДСТВА
  13. РУКОВОДСТВО ПО ОТСЛЕЖИВАНИЮ
  14. Полномочия в сфере политического руководства
  15. Глава 19 «Руководство пуговицы»
  16. Глава 3 ОБУЧЕНИЕ И ПОИСК РУКОВОДСТВА