Навигация
Главная
Поиск
Форум
FAQ's
Ссылки
Карта сайта
Чат программистов

Статьи
-Delphi
-C/C++
-Turbo Pascal
-Assembler
-Java/JS
-PHP
-Perl
-DHTML
-Prolog
-GPSS
-Сайтостроительство
-CMS: PHP Fusion
-Инвестирование

Файлы
-Для программистов
-Компонеты для Delphi
-Исходники на Delphi
-Исходники на C/C++
-Книги по Delphi
-Книги по С/С++
-Книги по JAVA/JS
-Книги по Basic/VB/.NET
-Книги по PHP/MySQL
-Книги по Assembler
-PHP Fusion MOD'ы
-by Kest
Professional Download System
Реклама
Услуги

Автоматическое добавление статей на сайты на Wordpress, Joomla, DLE
Заказать продвижение сайта
Программа для рисования блок-схем
Инженерный калькулятор онлайн
Таблица сложения онлайн
Популярные статьи
OpenGL и Delphi... 65535
Форум на вашем ... 65535
HACK F.A.Q 65535
Бип из системно... 65535
Гостевая книга ... 65535
Invision Power ... 65535
Содержание сайт... 65535
Организация зап... 65535
Вызов хранимых ... 65535
Программируемая... 65535
Эмулятор микроп... 65535
Подключение Mic... 65535
Создание потоко... 65535
Приложение «Про... 65535
Оператор выбора... 65535
Создание отчето... 64234
Модуль Forms 63954
Пример работы с... 61065
ТЕХНОЛОГИИ ДОСТ... 60843
Имитационное мо... 56376
Реклама
Сейчас на сайте
Гостей: 3
На сайте нет зарегистрированных пользователей

Пользователей: 13,080
новичок: setan
Новости
Реклама
Выполняем курсовые и лабораторные по разным языкам программирования
Подробнее - курсовые и лабораторные на заказ
Delphi, Turbo Pascal, Assembler, C, C++, C#, Visual Basic, Java, GPSS, Prolog, 3D MAX, Компас 3D
Заказать программу для Windows Mobile, Symbian

Поиск пути в графе заданном списками инцедентности на Turbo Pascal
Моделирование круглосуточного интернет кафе на GPSS + Отчет
Двунаправленный динамический список на Delphi + Блок схемы

Реклама



Подписывайся на YouTube канал о программировании, что бы не пропустить новые видео!

ПОДПИСЫВАЙСЯ на канал о программировании
Стандартные процедуры и функции модуля System
Пример использования процедур:

Например, в таблице дана запись:

procedure Dec (var X [; N: Longint]);

В программе нужно писать следующим образом: 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 16:36:34 · 0 Комментариев · 9339 Прочтений · Для печати

• Не нашли ответ на свой вопрос? Тогда задайте вопрос в комментариях или на форуме! •


Комментарии
Нет комментариев.
Добавить комментарий
Имя:



smiley smiley smiley smiley smiley smiley smiley smiley smiley
Запретить смайлики в комментариях

Введите проверочный код:* =
Рейтинги
Рейтинг доступен только для пользователей.

Пожалуйста, залогиньтесь или зарегистрируйтесь для голосования.

Нет данных для оценки.
Гость
Имя

Пароль



Вы не зарегистрированны?
Нажмите здесь для регистрации.

Забыли пароль?
Запросите новый здесь.
Поделиться ссылкой
Фолловь меня в Твиттере! • Смотрите канал о путешествияхКак приготовить мидии в тайланде?
Загрузки
Новые загрузки
iChat v.7.0 Final...
iComm v.6.1 - выв...
Visual Studio 200...
CodeGear RAD Stud...
Шаблон для новост...

Случайные загрузки
Text effect
PHP: Полезные приемы
isoCanvas (Редакт...
Ics
Мод "register.php...
PHP в примерах
Программирование ...
JanButtonsV
ZipTV
Технология .Net в VB
Библия хакера 2. ...
Preview
Рисование PopupMenu
Rss Parser
Форма в форме
Конвертирование и...
Основы Delphi
БД сеть компьютер...
DCAVI
Создание оригинал...

Топ загрузок
Приложение Клие... 100455
Delphi 7 Enterp... 86160
Converter AMR<-... 20072
GPSS World Stud... 12525
Borland C++Buil... 11612
Borland Delphi ... 8526
Turbo Pascal fo... 7035
Visual Studio 2... 4992
Калькулятор [Ис... 4744
FreeSMS v1.3.1 3539
Случайные статьи
Наследование обычн...
Принципы организац...
Синтаксис XPath-вы...
Определение параме...
"." expected
Строка соединения
Помещение модели д...
ДОСТОИНСТВА И НЕДО...
ОСНОВЫ ООП В DELPH...
Ограничение объясн...
LOGIC (ЛОГИЧЕСКИЙ ...
Операция VOP_LOOKUP
Списки моделирования
Создание и добавле...
Точная настройка д...
На томе NTFS разре...
Метрики
Панель управления ...
Ручная и автомати...
Пример: приведем с...
Увлекательные игры
Элемент ввода text...
Когда маршрутизато...
Язык С: определени...
Как отлично провес...
Статистика



Друзья сайта
Программы, игры


Полезно
В какую объединенную сеть входит классовая сеть? Суммирование маршрутов Занимают ли таблицы память маршрутизатора?