Навигация
Главная
Поиск
Форум
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 65417
ТЕХНОЛОГИИ ДОСТ... 62343
Имитационное мо... 57998
Реклама
Сейчас на сайте
Гостей: 11
На сайте нет зарегистрированных пользователей

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

Выбор наилучших альтернатив с использованием методов оптимизации на Delp...
Обратное размещение элементов ЭВС на Delphi + Пояснительная записка
Расчет размера дохода на одного человека в Turbo Pascal

Реклама



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

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


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



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

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

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

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

Пароль



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

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

Случайные загрузки
Приемы программир...
PHP 5 в подлинник...
Gold Submitter II...
JBlabel3D
ЯЗЫК ПРОГРАММИРОВ...
netBIOS
MxProtector
C++ для начинающих
Geo-Whois
БД сеть компьютер...
Паскаль и Дельфи....
TDBF
Task Shedule
Программирование ...
начисление процен...
EditNew
Исправление проц...
Философия C++. Пр...
Иллюстрированный ...
PHP 5 для "чайников"

Топ загрузок
Приложение Клие... 100471
Delphi 7 Enterp... 87462
Converter AMR<-... 20080
GPSS World Stud... 13086
Borland C++Buil... 11930
Borland Delphi ... 8632
Turbo Pascal fo... 7041
Visual Studio 2... 5000
Калькулятор [Ис... 4857
FreeSMS v1.3.1 3543
Случайные статьи
Топологическая игр...
Базовые криптограф...
Двухфазное кодиров...
Получение событий ...
Умножение и деление
ПОЛИМОРФНЫЕ АССОЦИ...
Проблемы синхрониз...
2.1. Вездесущий дв...
Размеры объектов к...
Процедура проверки...
END expected
Mill Trade (доход ...
задача №1 [GPSS]
Переходить ли в но...
Схема типичной инф...
Прозрачность окна
OpenGL. МИНИМАЛЬНА...
Ограничения (Oracl...
Проверка наличия о...
Статический импорт...
Первые шаги. Дейст...
Метод экспертного ...
Просмотр техническ...
Анонимный доступ г...
TABULATE (ЗАНЕСТИ ...
Статистика



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


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