В программе нужно писать следующим образом: Dec(X)
Слово procedure не следует писать.
На месте X нужно написать ваше выражение, которое вы хотите преобразовать.
Я не написал N, потому что данный параметр не обязателен. Параметры, указанные в квадратных скобках, не обязательны. Их можно не писать.
После переменной или константы указан тип данных, к которому должна принадлежать данная переменная.
Пример использования функций:
function Arctan(X: Extended): Extended;
В скобках указаны параметры функции. Это переменные или константы. За ними указан тип. После скобок тоже указан тип. Это тип данных этой функции. Функция возвращает значение этого типа.
В программе нужно написать так:
y := ArcTan(x); //Переменной y присвоилось значение арктангенса x
Таблица стандартных процедур и функций:
Функция
Описание функции
function Abs (x) Возвращает модуль выражения x целого или вещественного типа
var AllocMemCount: Integer Возвращает полное количество блоков памяти, выделенных программе
var AllocSize: Integer Возвращает кол-во памяти (в байтах), выделенное программе
procedure Append(var F: Text) Открывает текстовый файл F для добавления новых строк
function ArcTan(X: Extended): Extended Возвращает Арктангенс выражения x (в радианах)
procedure Assert(expr: Boolean[;const msg: String]) Проверяет условное значение expr. Выдаёт сообщение msg и останавливает программу, если выражение имеет значение. (Параметр msg не обязателен)
procedure AssignFile(var F; FileName: String) Связывает файловую переменную F с файлом, указанном в FileName
procedure Break Немедленно прекращает выполнение циклов for, while или repeat
procedure ChDir(S: String) Выбирает рабочим каталогом каталог S
function Chr(X: Byte):Char Преобразует числовое начение ASCII-кода X в символ
procedure CloseFile(var F) Закрывает файл F
function Concat(s1[, s2,...,sn]:String):String Объединяет строки от s1 до sn в единую строку (конкатенация)
procedure Continue Прекращает очередную итерацию цикла for, while или repeat
function Copy(S: String; Index, Count: Integer):String Возвращает часть строки (копирует из строки S Count символов, начиная с символа под номеромIndex)
function Cos (X: Extended): Extended Возвращает косинус аргумента X, заданного в радианах
procedure Dec(var X [; N:Longint]) Если N отсутствует, процедура уменьшает X на 1, если N указано, уменьшает X на N
procedure Delete(var S:String; Index, Count: Integer) Удаляет из строки S Count символов, начиная с символа под номером Index
function Eof(var F): Boolean Возвращает True, если достигнут конец файла любого типа(он весь прочитан)
function Eoln (var F: Textfile) Возвращает True, если достигнут конец строки текстового файла
procedure Erase(var F) Уничтожает файл, связанный с переменной F
procedure Exit Завершает работу подпрограммы
function FileSize(var F): Integer Возвращает размер нетекстового файла
function Frac(X:Extended):Extended Возвращает дробную часть X
procedure Halt Завершает выполнение программы
procedure Inc(var X [; N:Longint]) Если N отсутствует, процедура увеличивает X на 1, если N указано, увеличивает X на N
procedure Insert(Sourse:String; var S:String; Index: Integer) Вставляет подстроку Source в строку S, начиная с символа Index
function Int(X: Extended): Extended Возвращает целую часть вещественной переменной
function Length(S): Integer Возвращает длину строки S
function Ln(X: Real): Real Возвращает натуральный логарифм выражения X
procedure MkDir(S: String) Создаёт новый каталог с путём S
function Odd(X: Longint): Boolean Возвращает True, если аргумент - нечётное число
function Ord(C: Char): Byte Возвращает ASCII-код по символу C
function Pi: Extended Возвращает число p (пи) = 3,141592653589793
function Pos(Substr: String; S: String): Integer Возвращает номер символа, начиная с которого в строке S располагается подстрока Substr (производит поиск строки Substr в строке S)
function Random [(Range: Integer)] Возвращает псевдослучайное число в диапазоне от 0 до Range-1
procedure Randomize Инициирует генератор псевдослучайных чисел
procedure Read(var F, v1 [, v2,..., vn]) Считывает из файла F заданное количество значений и помещает их в переменные от v1 до vn
procedure ReadLn(var F, v1 [, v2,..., vn]) Считывает из файла F заданное количество строк и помещает их в переменные от v1 до vn
procedure Rename(var F; Newname: String) Переименовывает файл, связанный с файловой переменной F (присваивается новое имя Newname)
procedure Reset(var F) Открывает существующий файл для чтения и/или записи
procedure Rewrite(var F) Создаёт, а затем открывает файл F для записи
procedure RmDir(S: String) Удаляет пустой каталог S
function Round(X:Extended): Int64 Округляет вещественное число X до ближайшего целого
procedure Seek(var F; N: Longint); Пропускает N байт от начала файла F
procedure SetLength(var S; NewLength: Integer); Устанавливает новую длину строки или динамического массива
function Sin(X: Extended): Extended Возвращает синус аргумента( в радианах)
function SizeOf(X): Integer Возвращает длину переменной X в байтах
function Sqr(X: Extended): Extended Возвращает квадрат аргумента X
function Sqrt(X: Extended): Extended Возвращает квадратный корень из аргумента
procedure Str(X); Преобразует целое или вещественное число X в строку
function Trunc(X: Extended): Int64 Преобразует вещественное число X в целое путём отбрасывания дробной части
function UpCase(C: Char): Char Преобразует строчный символ C в заглавный
procedure Write(var F, v1 [, v2,..., vn]) Записывает в файл F заданное количество значений
procedure WriteLn(var F, v1 [, v2,..., vn]) Записывает в файл F заданное количество строк
Опубликовал Kest
October 29 2008 13:36:34 ·
0 Комментариев ·
10825 Прочтений ·
• Не нашли ответ на свой вопрос? Тогда задайте вопрос в комментариях или на форуме! •
Комментарии
Нет комментариев.
Добавить комментарий
Рейтинги
Рейтинг доступен только для пользователей.
Пожалуйста, залогиньтесь или зарегистрируйтесь для голосования.
Нет данных для оценки.
Гость
Вы не зарегистрированны? Нажмите здесь для регистрации.
Главная
Каталог файлов
