Turbo Pascal для начинающих

новости кз



Глава 3.Справочник


    Структура программы
    Программа на языке Pascal состоит из разделов: раздел объявления меток; раздел объявления констант; раздел объявления типов; раздел объявления переменных; раздел объявления процедур и функций; раз...
    Инструкция FOR
    Вариант 1 (с увеличением счетчика): for Счетчик := НачальноеЗначение to КонечноеЗначение do begin Инструкции } end; Инструкции между begin и end выполняются [{КонечноеЗначение — НачальноеЗначение)...
    Инструкция REPEAT
    repeat begin { Инструкции } end until Условие; Выполняются инструкции, находящиеся между begin и end (инструкции цикла), после этого проверяется значение выражения Условие. Если оно равно False (т...
    Инструкция WHILE
    while Условие do begin ( Инструкции } end; Проверяется значение выражения Условие, если оно равно True (условие выполняется), то выполняются инструкции, находящиеся между begin и end (инструкции ц...
    Безусловный переход
    Инструкция GoTo GoTo Метка; Осуществляется переход к инструкции, перед которой указана метка, объявленная в разделе label....
    Объявление функции
    Function ИмяФункции(var Параметр!: Тип1; var Параметр2:Тип2; var ПараметрJ:TnnJ) :Тип; const var begin end; ( Описание констант } { Описание переменных } { Инструкции функции } ИгляФункции: = Знач...
    Объявление процедуры
    Procedure ИмяПроцедуры(var Параметр!:Тип1; var Параметр2:Тип2; var FlapaMeTpJ: TnnJ) ; const { Описание констант } var begin end; { Описание переменных } Инструкции процедуры }...
    Встроенные функции и процедуры
    При описании функций и процедур приняты следующие обозначения: имена функций и процедур выделены полужирным шрифтом; параметры выделены курсивом (В качестве параметра могут использоваться констант...
    Зарезервированные слова и директивы
    Зарезервированные слова языка Turbo Pascal: and file not then array for object to asm function of begin goto or unit case packed until const procedure uses constructor in program var destructor in...
    Процедуры и функции
    В описании функций и процедур приняты следующие обозначения: имена функций и процедур выделены полужирным шрифтом; параметры выделены курсивом (В качестве параметра можно использовать константы, п...
    Математические функции
    Abs
    Синтаксис: function Abs(X) ; Действие: Возвращает абсолютное значение аргумента, в качестве которого можно использовать выражение целого или вещественного типа....
    Arctan
    Синтаксис: function Arctan(X: real): real; Действие: Возвращает арктангенс аргумента — угла, величина которого выражена в радианах....
    Cos
    Синтаксис: function Cos(X: real): real; Действие: Возвращает косинус аргумента — угла, величина которого выражена в радианах....
    Ехр
    Синтаксис: function Exp(X: real): real; Действие: Возвращает значение, равное экспоненте аргумента....
    Ln
    Синтаксис: function Ln(X: real): real; Действие: Возвращает значение, равное натуральному логарифму аргумента....
    Sin
    Синтаксис: function Sin(X: real): real; Действие: Возвращает синус аргумента — угла, величина которого выражена в радианах....
    Sqr
    Синтаксис: function Sqr(X) ; Действие: Возвращает квадрат аргумента, в качестве которого можно использовать выражение целого или вещественного типа....
    Sqrt
    Синтаксис: function Sqrt(X: real): real; Возвращает значение, равное квадратному корню из аргумента....
    Random
    Синтаксис: function Random [ (Диапазон: word)]; Действие: Если параметр Диапазон не указан, то возвращает случайное число X, которое удовлетворяет условию 0 = X 1. Если параметр диапазон указан, т...
    Randomize
    Синтаксис: procedure Randomize; Действие: Инициализирует программный генератор случайных чисел....
    Основные типы данных
    К основным типам данных языка Pascal относятся: целые числа (integer и др.); действительные числа (real и др.); символы (char); строки (string); логический (boolean). Целые числа и числа с плавающ...
    Функции и процедуры преобразования
    Int
    Синтаксис: function Int(X: real): real; Действие: Возвращает целую часть аргумента как значение вещественного типа. Дробная часть аргумента при преобразовании не учитывается, т. е. функция не прои...
    Round
    Синтаксис: function Round(X: real): longint; Действие: Возвращает округленное к ближайшему целому значение аргумента....
    Str
    Синтаксис: procedure Str(X [:ВсегоСимволов [:ДробнаяЧасть ]]; var Строка: string); Действие: Выполняет преобразование числового выражения в его строковое представление. ВсегоСимволов и дробнаяЧаст...
    Trunc
    Синтаксис: function Trunc(X: real): longint; Действие: Возвращает целую часть аргумента как значение целого типа. Дробная часть аргумента при преобразовании не учитывается, т. е. функция не произв...
    Val
    Синтаксис: procedure Val(Строка: string; var Переменная; var Ошибка : integer); Действие: Выполняет преобразование строки, изображающей целое или вещественное число, в число. Полученное значение п...
    Функции и процедуры для работы со строками и символами
    Chr
    Синтаксис: function Chr{КодСимвола: byte): char; Действие: Возвращает символ с указанным кодом....
    Concat
    Синтаксис: function Concat(si [, s2, ...,sN] : string): string; Действие: Возвращает строку, являющуюся объединением строк, указанных при вызове функции....
    Сору
    Синтаксис: function Copy(s: string; n:integer; 1: integer): string; Действие: Возвращает подстроку — часть строки а. Подстрока начинается с символа с номером л и состоит из i символов....
    Delete
    Синтаксис: procedure Delete(var s: srting; НомерСимвола: integer; Сколько: integer); Действие: Удаляет из строки s ее часть, которая начинается с символа с номером п и состоит из i символов....
    Length
    Синтаксис: function Length(Строка: string): integer; Действие: Возвращает значение, равное количеству символов строки-аргумента....
    Pos
    Синтаксис: function Pos(Строка: string; Подстрока: string): byte; Действие: Возвращает позицию (номер символа) подстроки в строке....
    Процедуры и функции графического режима
    Arc
    Синтаксис: procedure Arc(x,у: integer; УголНачала, УголКонца: integer; Радиус: integer); Действие: Вычерчивает дугу с центром в точке с координатами (х,у). Параметры УголНачала и УголКонца задают...
    Bar
    Синтаксис: procedure Bar(xl,yl,x2,y2: integer); Действие: Вычерчивает закрашенный прямоугольник. Параметры xl и yl задают положение левого верхнего угла прямоугольника, х2 и у2 — правого нижнего....
    Bar3D
    Синтаксис: procedure Bar3D(xI,yl,x2,y2: integer; Глубина: word; Граница: boolean); Действие: Вычерчивает параллелепипед. Параметры xl и yl задают положение левого верхнего, а х2 и у2 — правого ниж...
    Circle
    Синтаксис: procedure Circle(х,у: integer; r: word); Действие: Вычерчивает окружность радиуса г с центром в точке с координатами (х,у). Цвет окружности можно задать при помощи процедуры Setcolor....
    DetectGraph
    Синтаксис: DetectGraph(var Драйвер, Режим: integer); Действие: Проверяет графический адаптер и определяет, какой графический драйвер и режим используются....
    Ellipse
    Синтаксис: procedure Ellipse(х,у: integer; УголНачала, УголКонца: word; РадиусХ, РадиусУ: word) ; Действие: Вычерчивает эллипс или дугу эллипса с центром в точке с координатами (к,у). Параметры Уг...
    GetX, GetY
    Синтаксис: function GetX: integer; function GetY: integer; Действие: Возвращают координаты х и у указателя вывода....
    GraphResult
    Синтаксис: function GraphResult: imteger; Возвращает результат (код ошибки) последней выполненной графической операции. Если операция выполнена успешно, функция возвращает ноль. Код ошибки выполне...
    InitGraph
    Синтаксис: InitGraph(var Driver: integer; var Mode: integer; Path: string) Действие: Инициализирует графический режим. Параметр Driver определяет драйвер видеосистемы, параметр Mode — режим работы...
    Line
    Синтаксис: procedure Line(xl,yl,x2,y2: integer); Действие: Вычерчивает линию между двумя точками экрана, координаты которых указаны при вызове процедуры. Линия вычерчивается стилем, установленным...
    LineTo
    Синтаксис: procedure Line(x2,yl: integer); Действие: Вычерчивает линию от текущего положения указателя вывода до точки, координаты которой указаны при вызове процедуры. Линия вычерчивается стилем,...
    MoveTo
    Синтаксис: procedure MoveTo(x,у: integer); Действие: Перемещает указатель вывода в точку с координатами х и у....
    MoveRel
    Синтаксис: procedure MoveRel(dx:, dy: integer); Действие: Перемещает указатель вывода на dx и dy пикселов. Если значение параметра dx (dy) положительное, то указатель перемещается вниз (влево), ес...
    OutText
    Синтаксис: procedure OutText{Текст: string); Действие: Выводит строку символов текст от текущего положения указателя вывода и перемещает указатель вывода в точку, расположенную за последним выведе...
    OutTextXY
    Синтаксис: procedure OutTextXY(x, у: integer; Текст: string); Действие: Устанавливает указатель вывода в точку с координатами (х,у) и выводит строку символов текст, при этом указатель вывода своег...
    PieSlice
    Синтаксис: procedure PieSlice(х,у: integer; УголНачала,УголКонца, Радиус: word); Действие: Вычерчивает сектор радиуса Радиус с центром в точке с координатами (х,у). Параметры УголНачала и УголКонц...
    PutPixel
    Синтаксис: procedure PutPixel(х,у: integer; Цвет: word); Действие: Окрашивает пиксел, точку с координатами (х,у), цветом цвет. В качестве параметра цвет обычно используют именованную КОНСТаНТу (СМ...
    Rectangle
    Синтаксис: procedure Rectangle{xl,yl,x2,y2: integer); Действие: Вычерчивает прямоугольник. Параметры xi и yi задают положение левого верхнего угла прямоугольника, х2 и у2 — правого нижнего угла пр...
    SetLineStyle
    Синтаксис: procedure SetLineStyle(ТипЛинии: word; Образец: word; Толщина: word) ; Действие: Устанавливает стиль вычерчиваемых контуров и линий (см. процедуры Line, Circle И Др.). Параметр тип лини...
    SetTexStyle
    Синтаксис: procedure SetTexStyle{Шрифт, Ориентация, Размер: word); Действие: Устанавливает шрифт, размер и ориентацию текста, выводимого процедурами outTextxY и outText. В качестве параметра шрифт...
    Процедуры и функции для работы с файлами
    Append
    Синтаксис: procedure Append(var F: text); Действие: Открывает существующий файл, связанный с файловой переменной f в режиме добавления в конец файла. При попытке открыть несуществующий файл появля...
    Assign
    Синтаксис: м procedure Assign(var F; ИмяФайла: string); Действие: Связывает файловую переменную г с конкретным файлом....
    Close
    Синтаксис: procedure Close(var F) ; Действие: Закрывает файл, связанный с файловой переменной к>...
    EOF
    Синтаксис: function EOF(var F) : boolean; Действие: Проверяет, не достигнут ли конец файла (end of file) при чтении из файла, связанного с файловой переменной f. Если указатель чтения достиг конца...
    Erasre
    Синтаксис: procedure Erase(var F) ; Действие: Уничтожает файл, имя которого связано с файловой переменной F....
    IOResult
    Синтаксис: function lOResult: integer; Действие: Возвращает код результата последней выполненной операции файлового ввода-вывода (в том числе открытия и закрытия файла). Если операция ввода-вывода...
    Reset
    Синтаксис: procedure Reset(var F [:file; RecSize: word]); Действие: Открывает существующий файл. Тип файла может быть любым. Если элементы файла не относятся к одному из стандартных типов, то пара...
    Rewrite
    Синтаксис: procetfbure Rewrite(var F [:file; RecSize: word]); Действие: Создает и открывает файл, имя которого связано с файловой переменной г. Если файл с таким именем уже существует то процедура...
    Прочие функции
    ClrEol
    Синтаксис: procedure ClrEol; Действие: Очищает текущую строку (строка, в которой находиться курсор) В которой курсор, до конца строки закрашивая ее текущим цветом....
    ClrSctr
    Синтаксис: procedure ClrScr; Действинг: Очищает текущее (заданное процедурой window) окно экрана закрашивая его цветом, заданным процедурой tJLJT*...
    Delay Синтаксис: proceduir Delay (Задержка: word) ; Действие:
    Обеспечивает задержку выполнения программы в миллисе-кундах....
    Dispose
    Синтаксис: procedure Dispose(var p); Действие: Освобождает память, занимаемую динамической переменной, на которую указывает р....
    Eoln Синтаксис:
    function Eoln [ (var F: text)]: boolean; Действие: Если при обращении к функции Eoln параметр не указан, то функция проверяет, не является ли очередной символ, читаемый из буфера клавиатуры, символ...
    GotoXY
    Синтаксис: procedure GoToXY(x,y: byte); Действие: Перемещает курсор в точку экрана, имеющую координаты (х,у)....
    Halt
    Синтаксис: procedure Halt [ (КодЗавершения: word) ]; Действие: Завершает выполнение программы и передает управление операционной системе....
    New
    Синтаксис: procedure New(var р) ; Действие: Выделяет память для динамической переменной и присваивает указателю р адрес выделенной области....
    ParamCount
    Синтаксис: function ParamCount: word; Действие: Возвращает количество параметров командной строки....
    ParamStr
    Синтаксис- function ParamStr (A/: word): string^ Действие: Возвращает параметр командной строки, номер которого указан при обращении к функции. Значением ParamStr(O) является путь к файлу выполняе...
    ReadKey
    Синтаксис: function ReadKey : char; Действие: Возвращает символ, соответствующий нажатой клавише. Используя функцию Ord, можно получить код нажатой клавиши. Если нажата служебная клавиша (например...
    TextBackGround
    Синтаксис: procedure TextBackGround(Цвет: byte); Действие: Задает цвет фона сообщений, выводимых инструкциями write и writein. В качестве параметра цвет может использоваться одна из перечисленных...
    TextColor
    Синтаксис: procedure TextColor(Цвет; byte); Действие: Устанавливает цвет символов сообщений, выводимых инструкциями write и writein. В качестве параметра цвет может использоваться одна из перечисл...
    WhereX
    Синтаксис: function WhereX: byte; Действие: Возвращает координату х курсора в текущем окне, заданном Процедурой Window....
    WhereY
    Синтаксис: function WhereY: byte; Действие: Возвращает координату y курсора в текущем окне, заданном процедурой window....
    Window
    Синтаксис: procedure Window(xl,yl,x2,y2: byte); Действие: Определяет окно — область экрана. Параметры xi,yi задают координаты левого верхнего угла окна, а параметры х2,у2 — правого нижнего угла....
    Целые числа
    Формат Диапазон значений SHORTINT -128-127 INTEGER -32 768-32 767 LONGINT -2 147 483 648-2 147 483 647 BYTE 0-255 WORD 0-65 535...
    Действительные числа
    Формат Диапазон значений Количество значащих цифр REAL 2.9E-39-1.7e38 11-12 SINGLE 1.5E-45-3.4e38 7-8 DOUBLE 5.0Е-324-1.7е308 15-16 EXTENDED 3.4Е-4932-1.1е4932 19-20...
    Строки
    Строки могут быть объявлены двумя способами. Вариант 1: Имя: string; Объявлена переменная-строка длиной 255 символов. Вариант 2: Имя: string[ДлинаСтроки ]; Объявлена переменная-строка указанной дл...
    Массивы
    Объявление одномерного массива: ИмяМассива:array[НижнийИндекс..ВерхнийИндекс] of ТипЭлементов; Объявление двумерного массива: ИмяМассива:array[НижнийИндекс1..ВерхнийИндекс1, НижнийИндекс2..Верхний...
    Записи
    Записи можно объявить двумя способами. Вариант 1: ПеременнаяЗапись:record Поле1: Тип1 ; Поле2:Тип2; ПолеО:TnnJ; end; Вариант 2 (сначала объявляется тип записи, затем — переменная-запись): type Имя...
    Инструкция IF
    Вариант 1: if Условие then begin { Эти инструкции выполняются, } { если Условие истинно } end else begin ( Эти инструкции выполняются, } { если Условие ложно } end; Вариант 2: if Условие then begi...
    Инструкция CASE
    Вариант 1: case Выражение of Список_констант1: begin { Инструкции 1 } end; Список_констант2: begin { Инструкции 2 } end; Список_коистантЗ: begin { Инструкции 3 } end; end; Вариант 2: case Выражени...









Начало