Справочник
Структура программы. Основные типы данных.
Программа на языке Pascal состоит из разделов: | раздел объявления меток; | раздел объявления констант; | раздел объявления типов; | раздел объявления переменных; | раздел объявления процедур и функций; | раздел инструкций программы.Целые числа. Действительные числа. Строки.
Формат | Диапазон значений | 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Массивы. Записи.
Объявление одномерного массива: | ИмяМассива:array[НижнийИндекс..ВерхнийИндекс] of ТипЭлементов; | Объявление двумерного массива: | ИмяМассива:array[НижнийИндекс1..ВерхнийИндекс1, | НижнийИндекс2..ВерхнийИндекс2 ] of ТипЭлементов; | Записи | Записи можно объявить двумя способами.Выбор: Инструкция IF. Инструкция CASE.
Вариант 1: | if Условие then | begin | { Эти инструкции выполняются, } | { если Условие истинно } | end | else | begin | (Эти инструкции выполняются, } | { если Условие ложно } | end; | Вариант 2: | if Условие then | begin | { Эти инструкции выполняются, } | { если Условие истинно } | end;Циклы: Инструкция FOR. Инструкция REPEAT. Инструкция WHILE. Безусловный переход: Инструкция GoTo.
Вариант 1 (с увеличением счетчика): | for Счетчик: = НачальноеЗначение to КонечноеЗначение do begin | { Инструкции } | end; | Инструкции между begin и end выполняются [{КонечноеЗначение -НачальноеЗначение) + 1] раз.Объявление функции. Объявление процедуры. Процедуры и функции.
Function ИмяФункции (var Параметр1: Тип1; | var Параметр2:Тип2; | var Параметр3:Тип3):Тип; | const | var | begin | end; | (Описание констант } { Описание переменных } | { Инструкции функции } ИмяФункции: = Значение; | Объявление процедуры | Procedure ИмяПроцедуры (var Параметр1:Тип1; var Параметр2:Тип2;Встроенные функции и процедуры
При описании функций и процедур приняты следующие обозначения: | имена функций и процедур выделены полужирным шрифтом; | параметры выделены курсивом (В качестве параметра могут использоваться константы, переменные или выражения соответствующих типов.Зарезервированные слова и директивы
Зарезервированные слова языка 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 | inherited | record | while | divМатематические функции
Abs | Синтаксис: | function Abs(X); | Действие: | Возвращает абсолютное значение аргумента, в качестве которого можно использовать выражение целого или вещественного типа. | Arctan | Синтаксис: | function Arctan(X: real): real;Функции и процедуры преобразования
Int | Синтаксис: | function Int(X: real): real; | Действие: | Возвращает целую часть аргумента как значение вещественного типа. Дробная часть аргумента при преобразовании не учитывается, т. е. функция не производит округление. | Round | Синтаксис: | function Round(X: real): longint;Функции и процедуры для работы со строками и символами
Chr | Синтаксис: | function Chr{КодСимвола: byte): char; | Действие: | Возвращает символ с указанным кодом. | Concat | Синтаксис: | function Concat(si [, s2,…,sN]: string): string; | Действие: | Возвращает строку, являющуюся объединением строк, указанных при вызове функции. | Copy | Синтаксис: | function Copy(s: string;Процедуры и функции графического режима
Arc | Синтаксис: | procedure Arc(x,у: integer; УголНачала, УголКонца: integer; Радиус: integer); | Действие: | Вычерчивает дугу с центром в точке с координатами (х,у). Параметры УголНачала и УголКонца задают угловые координаты начальной и конечной точек линии дуги, которая вычерчивается против часовой стрелки от начальной точки к конечной. | Угловые координаты задаются в градусах.Процедуры и функции для работы с файлами
Append | Синтаксис: | procedure Append(var F: text); | Действие: | Открывает существующий файл, связанный с файловой переменной f в режиме добавления в конец файла. При попытке открыть несуществующий файл появляется ошибка времени выполнения программы. | Assign | Синтаксис: | procedure Assign(var F;Прочие функции
ClrEol | Синтаксис: | procedure ClrEol; | Действие: | Очищает текущую строку (строка, в которой находится курсор), до конца строки закрашивая ее текущим цветом. | ClrSctr | Синтаксис: | procedure ClrScr; | Действие: | Очищает текущее (заданное процедурой window) окно экрана закрашивая его цветом, заданным процедурой. | Delay | Синтаксис: | proceduir Delay (Задержка: word);