Краткая справка по языку программирования Turbo Pascal



         

Модуль Graph



Модуль Graph

    • Изображение геометрических фигур и линий
    • Модуль Overlay

      Модуль System

      Интерфейс

      Назначение

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

      Function Abs(x : real): real; Абсолютное значение
      Function ArcTan(x : real): real; Арктангенс угла в радианах
      Function Cos(x : real): real; Косинус угла в радианах
      Function Exp(x : real): real; Показательная функция (экспонента)
      Function Frac(x : real): real; Дробная часть числа
      Function lnt(x : real): real; Целая часть числа
      Function Ln(x : real): real; Логарифм
      Function Pi: real; Число ?
      Function Random: real;

      Function Random(Range : word): word;

      Если задан диапазон Range - значение типа word от 0 до (Range - 1), если не задан - вещественное от 0 до 1.

      Случайное число
      Procedure Randomize; Инициализация генератора случайных чисел случайным значением
      Function Sin(x : real): real; Синус угла в радианах
      Function Sqr(x : real): real; Квадрат аргумента
      Function Sqrt(x : real) :real; Квадратный корень из аргумента

      Преобразование типов

      Function Chr(i: byte): char;

      i-код ASCII символа

      Возвращает символ по его коду в таблице ASCII
      Function Ord(i: Порядковый тип>): longint; Преобразует типы char и boolean к целому типу; для целых аргументов повторяет значение аргумента
      Function Round(x : <вещественный тип>): longint; Округляет значение вещественного типа до целого
      Function Trunc(x : <вещественный тип>): longint; Усекает значение вещественного типа до целого

      Порядковые процедуры и функции

      Procedure Dec(var i: <порядковый тип>); Procedure Dec(var i: <порядковый тип>, n: longint); Преобразует переменную порядкового типа i к предшествующему значению или на n шагов назад
      Function High(X) :Tx;

      X - переменная порядкового типа, строка, массив или порядковый тип, строковый тип, тип массив;

      Тх - совпадает по типу с порядковым типом Х или имеет целое значение для строк и массивов

      Наибольшее значение для

      заданного объекта порядково

      го типа или наибольший

      индекс для строки и массива

      Procedure lnc( var i: <порядковый тип>); Procedure Inс( var i: <порядковый тип>, n : longint); Преобразует переменную порядкового типа i к последующему значению или на n шагов вперед
      Function Low(X): Тх;

      X - переменная порядкового типа, строка, массив или порядковый тип, строковый тип, тип массив;

      Тх - совпадает по типу с порядковым типом Х или имеет целое значение для строк и массивов

      Наименьшее значение для заданного объекта порядкового типа или наименьший индекс для строки и массива
      Function Odd( i: <порядковый тип>): boolean; Проверка числа на нечетность
      Function Predf i: <порядковый тип>): <порядковый тип>; Возвращает предыдущее значение для порядкового типа, не изменяя переменной
      Function Succf i: <порядковый тип>): <порядковый тип>; Возвращает следующее значение порядкового типа, не изменяя переменной

      Байтовые операции

      Function Hi(X : word): byte; Старший байт аргумента
      Function Lo(X : word): byte; Младший байт аргумента
      Function Swap(X: <двухбайтный аргумент>): <тип аргумента>; Перестановка старших и младших байтов аргумента

      Работа с параметрами командной строки

      Function ParamCount: word; Определяет число параметров, переданных программе при запуске в командной строке
      Function ParamStr(Num : byte): String; Num - номер параметра Возвращает заданный параметр командной строки

      Управление вычислительным процессом

      Procedure Break; Выход из цикла
      Procedure Continue; Завершение очередной итерации цикла
      Procedure Exit; Выход из текущего блока
      Procedure Halt;

      Procedure Halt(ExitCode : word);

      ExitCode - код завершения программы

      Прекращение выполнения программы и возврат в операционную систему
      Procedure RunError;

      Procedure RunError(ErrorCode : byte);

      ErrorCode- код ошибки

      Остановка выполнения

      программы и генерация

      ошибки времени выполнения

      Указатели и адресация

      Function Addr(X : <переменная или подпрограмма>): Pointer;

      X - объект (переменная, процедура или функция); Результат - адрес объекта

      Определяет адрес заданного объекта
      Function Cseg: word; Текущее значение регистра CS
      Function DSeg: word; Текущее значение регистра DS
      Function Ofs(X : <переменная или подпрограмма>): word;

      X - объект (переменная, процедура или функция); Результат - смещение адреса объекта

      Определяет смещение адреса заданного объекта
      Function Ptr(Segment, Offset: word): Pointer; Segment, Offset - сегмент и смещение, результат указатель (полный адрес) Образует указатель по заданному сегменту и смещению
      Function Seg(X : <переменная или подпрограмма>): word;

      Х - объект (переменная, процедура или функция); Результат - сегмент адреса объекта

      Определяет сегмент адреса заданного объекта
      Function SPtr : word; Текущее значение регистра SP
      Function SSeg

      : word;

      Текущее значение регистра SS

      Работа с памятью

      Procedure FillChar(varX : <переменная любого типа>; Count: word; Value : <byte или char>);

      X - переменная, с которой начинается заполнение; Count - число байт; Value - заполнение

      Заполняет заданное число последовательных байтов указанным значением
      Procedure Movefvar

      Source, Dest; Cound : word); Source - источник, Dest - приемник ; Count - число байтов;

      Копирование заданного числа байтов из источника в приемник
      Function SizeOf(X:<переменная любого типа или тип>): word; Число байтов, занимаемых аргументом

      Работа с динамическими переменными

      Function Assigned(var P : Pointer): boolean; Результат - false, если P=nil и true в противном случае Проверяет, присвоено ли значение указателю
      Procedure Dispose(var Ptr: Pointer);

      Procedure Dlspose(var Ptr: Pointer; Done : Destructor);

      Ptr - указатель на динамическую переменную; метод Done задается при уничтожении объектов

      Уничтожает динамическую переменную
      Procedure FreeMem

      (var Ptr: Pointer; Size : word);

      Ptr - указатель на переменную; Size - размер переменной в байтах;

      Уничтожает динамическую переменную заданного размера
      Procedure GetMein (var Ptr: Pointer; Size : word);

      Ptr - указатель на переменную; Size - размер переменной в байтах;

      Создает новую динамическую переменную заданного размера и устанавливает указатель на нее
      Procedure Mark(var Ptr: Pointer); Ptr -указатель; Записывает текущее состояние кучи в переменную типа указатель
      Procedure New(var Ptr: Pointer); Создает новую динамическую
      Procedure Dispose

      (var Ptr: Pointer; Init: constructor); Ptr - указатель на динамическую переменную; метод Init задается при создании объектов

      переменную и устанавливает указатель на нее
      Function MaxAvail: Longint; Возвращает размер наибольшего непрерывного свободного блока кучи
      Function MemAvail: Longint; Возвращает количество свобод ных байтов, имеющихся в куче
      Procedure Release(var Ptr: Pointer);

      Ptr - указатель;

      Освобождает часть памяти, следующую после указателя

      Работа с множествами

      Procedure Exclude(var S : set of T; Element: T);

      S - множество элементов типа T, Element - элемент типа Т

      Исключает элемент из множества
      Procedure lnclude(var S : set of T; Element: T);

      S - множество элементов типа T, Element - элемент типа Т

      Включает элемент в множество

      Ввод и вывод

      Procedure Assign(FileVar: <файловый тип>, File-Name);

      FileVar - переменная файлового типа; FileName - строка, содержащая имя файла

      Присвоение имени внешнего файла файловой переменной
      Procedure ChDir(NewDir: string);

      NewDir - новая директория

      Изменение текущего каталога
      Procedure Close(FileVar: <файловыйтип>): FileVar - переменная файлового типа; Закрытие открытого файла
      Function Eof(FileVar: <файловый тип>): boolean; FileVar - переменная файлового типа Определяет, достигнут ли конец файла
      Procedure Erase(FileVar: <файловыйтип>);

      FileVar - переменная файлового типа

      Удаление внешнего файла
      Function FilePos( FileVar: <файловый тип>): longint; FileVar - переменная файлового типа; результат - текущая позиция указателя в файле Возвращает текущую позицию указателя в файле
      Function FileSize(FileVar: <файловый тип>): longint; FileVar - переменная файлового типа; результат - число записей в файле Возвращает текущий размер файла
      Procedure GetDir(Driv : byte; var CurrentDir: string); Driv - числовой код диска (0-текущий, 1 -А, 2-В и т.д.) CurrentDir - текущий каталог; Возвращает текущий каталог на заданном диске
      Function lOResult: integer; Возвращает код состояния последней выполненной операции ввода / вывода
      Procedure MRDir(NewDir: string);

      NewDir - новый каталог

      Открывает новый каталог
      Procedure Read(FileVar: <файловый тип>; var v1,v2,....);

      Procedure Read(var FileVar: Text; varv1,v2,....); Procedure Read(v1,v2,....);

      FileVar - переменная файлового типа, для чтения при вводе с клавиатуры может не указываться; v1, v2,... - переменные

      Считывает одно или более значений из файла в одну или более переменных
      Procedure ReName(FileVar: <файловыйтип>, NewName);

      FileVar - переменная файлового типа; NewName -строка, содержащая новое имя файла

      Переименовывает внешний файл
      Procedure ReSet( FileVar: <файловый тип>):FileVar - переменная файлового типа Открывает существующий файл
      Procedure ReWrite( FileVar: <файловый тип>):FileVar - переменная файлового типа Создает и открывает новый файл
      Procedure RmDir(DelDir: string);

      DelDir - удаляемый каталог

      Удаление пустого каталога
      Procedure Seek(FileVar: <файловый тип>; Pos : longint);

      FileVar - переменная файлового типа; Pos – позиция указателя

      Передвигает указатель на заданную компоненту файла
      Procedure Truncate(FileVar: <файловый тип>): FileVar - переменная файлового типа Усекает размер файла до текущей позиции в файле
      Procedure Write(FileVar: <файловый тип>; var v1,v2,„..);

      Procedure Write(var FileVar: Text; varv1,v2,....);

      Procedure Write(v1,v2,....);

      FileVar - переменная файлового типа, для вывода на экран может не указываться; v1,v2, ... -переменные

      Записывает одно или более значений из одной или более переменных в файл

      Работа со строками и символами

      Function Concat(s1, s2,... : string): string;

      s1, s2 - последовательность объединяемых строк

      Объединение (конкатенация) последовательности строк
      Function Copy(Source : String; Pos, Count: integer):string;

      Source - исходная строка; Pos - номер позиции, с которой начинается копирование; Count – число копируемых символов

      Копирует подстроку из строки
      Procedure Delete(var Source : String; Pos, Count: integer);

      Source- строка, с которой проводится операция;

      Pos- номер позиции, с которой начинается удаление;

      Count - число удаляемых символов

      Удаляет подстроку из строки
      Procedure lnsert(Source : String; var Dest: string; Pos: integer);

      Source - вставляемая строка; Dest - строка, с которой проводится операция; Pos - номер позиции, с которой начинается вставка

      Вставляет подстроку в строку
      Function Length(S : String): integer; S - строка Определяет динамическую длину строки
      Function Pos(SubStr, S : String): byte;

      S - строка, в которой происходит поиск;

      SubStr -искомая подстрока, результат - позиция в S, начиная с которой следует искомая подстрока. Если подстрока не содержится в строке, возвращается 0

      Поиск подстроки в строке
      Procedure Str(X : <целый или вещественный тип>;var S : String);

      Х - преобразуемое число (может быть указан форматпреобразования),

      S - результирующая строка

      Преобразует численное значение в строку
      Function UpCase(Symbol: Char): Char; Преобразует буквы латинского алфавита в прописные
      Procedure Val(ValueString : string; var X: <целый или вещественный тип>; var ErrorCode: integer);

      ValueString - преобразуемая строка; Х – результат целого или вещественного типа; ErrorCode – код ошибки

      Преобразует строку в численное значение

      Текстовые файлы

      Procedure Append(var F: Text); F - переменная, соответствующая текстовому файлу Открывает существующий файл для добавления текста в конец файла
      Function EoLn(var F : Text): boolean ;

      Значение функции true, если в файле достигнут конец строки, и false - в противоположном случае

      Определяет, достигнут ли в файле конец строки
      Procedure Flush(var F : Text);

      F - переменная, соответствующая текстовому файлу

      Выталкивает содержимое буфера в файл
      Procedure ReadLn(var F: Text; var v1,v2,....);

      Procedure ReadLn(varv1,v2,....);

      F - текстовый файл, для чтения при вводе с клавиатуры может не указываться; v1, v2,... -переменные

      Выполняет те же действия, что и Read, а потом делает пропуск до начала следующей строки файла
      Function SeekEof(var F : Text): boolean;

      F - текстовый файл

      Определяет, достигнут ли конец файла, пропуская пробелы, символы табуляции и конца строк
      Function SeekEoln(var F : Text): boolean;

      F - текстовый файл

      Определяет, достигнут лив файле конец строки, пропуская пробелы и символы табуляции
      Function SetTextBuf(var F : Text; var But; Size : word);

      Function SetTextBuf(var F : Text; var Buf);

      F - текстовый файл; Buf - буфер; Size – размер буфера

      Назначает буфер ввода, вывода для текстового файла
      Procedure WriteLn(var F : Text; varv1,v2,....);

      Procedure WriteLn(varv1,v2,....);

      F - текстовый файл, для вывода на экран может не указываться; v1, v2,... - переменные

      Выполняет те же действия, что и Write, а потом добавляет к файлу маркер конца строки

      Работа с нетипизированными файлами

      Procedure BlockRead(var F: File; var Buf: <любой тип>; Count: word);

      Procedure BlockRead(var F : File; var Buf: <любой тип>; Count: word; var Result: word);

      F - файл; Buf - буфер, в который осуществляется считывание; Count - число записей; Result – текущее положение указателя

      Считывает из файла в переменные одну или более записей
      Procedure BlockWrite(var F : File; var Buf: <любой тип>; Count :word);

      Procedure BlockWrite(var F: File; var Buf: <любой тип>; Count: word; var Result: word);

      F - файл; Buf - буфер, в который осуществляется считывание; Count - число записей; Result - текущее положение указателя

      Записывает в файл одну или более записей из переменных
      <


      Содержание  Назад  Вперед