Навигация
Главная
Поиск
Форум
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
Программируемая... 65535
Эмулятор микроп... 65535
Подключение Mic... 65535
Создание потоко... 65535
Приложение «Про... 65535
Оператор выбора... 65535
Модуль Forms 65535
ТЕХНОЛОГИИ ДОСТ... 64160
Имитационное мо... 58787
Реклама
Сейчас на сайте
Гостей: 6
На сайте нет зарегистрированных пользователей

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

База данных студентов на Delphi (файл записей) + Блок схемы
Моделирование работы крупного аэропорта на GPSS + Пояснительная записка
Моделирование литейного цеха на GPSS + Пояснительная записка

Реклама



Подписывайся на 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 Комментариев · 9467 Прочтений · Для печати

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


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



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

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

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

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

Пароль



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

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

Случайные загрузки
Cтатьи Королевств...
MPTools
Основы программир...
DirHTMLReportBuil...
Delphi 2005. Разр...
Delphi 7 Enterpri...
PDJ_Anima
Рисование PopupMenu
Программирование ...
PCX
HTMLredaktor
Еext Editor
RSS Feeds
Delphi 2005 Учимс...
Rotolabel
Игра PackMan
Усложнённый кальк...
Эффект лампы на р...
Алгоритмы шифрова...
Drag&Drop

Топ загрузок
Приложение Клие... 100498
Delphi 7 Enterp... 88633
Converter AMR<-... 20084
GPSS World Stud... 13996
Borland C++Buil... 12267
Borland Delphi ... 8763
Turbo Pascal fo... 7062
Visual Studio 2... 5007
Калькулятор [Ис... 4986
FreeSMS v1.3.1 3547
Случайные статьи
Каковы правила пои...
Отладка CGI-скрипт...
Общие подходы к пр...
включите для учетн...
О стандартах прогр...
Система SVR4
База данных на пас...
Программные компон...
Клуб Вулкан доступ...
Управление контентом
Кейс-модинг
Как писать правиль...
Constant out of range
Центробежный насос
Cannot rename acro...
Нерекурсивное пост...
плана безопасности
COM и защита
Распределение конц...
Различные ограниче...
Инструменты для ра...
Важные замечания п...
Раскрутка сайта с ...
Необходимость испо...
Как работают поиск...
Статистика



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


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