98
Приложение B. Стандартные процедуры и функции UniPascal-я
переменная удаляется и занимаемая ею память становится доступной для
дальнейшего применения.
procedure GETDATE(var Year, Month, Day: word);
Предназначение: Получение текущей даты.
Действие: Переменным Year, Month, Day присваиваются значения текущего года, месяца
и дня, соответственно. Year может быть от 1980 до 2099, Month - от 1 до 12, а
Day - от 0 до 31. Если переменная Day получит значение 0, значит в
операционной системе не установлена текущая дата.
procedure GETMEMWORDS(var p:pointer; WrdSz: Natural);
Предназначение: Резервирование памяти.
Действие: p - переменная ссылочного типа. В памяти занимается область размером в
WrdSz слов. Начало области возвращается в р. Внимание! Нельзя предполагать,
что память, занятая двумя последовательными выполнениями процедуры,
образует непрерывное поле памяти.
procedure GETTIME(var Hour, Min, Sec, s100: word);
Предназначение: Получение текущего времени.
Действие: Переменным Hour,Min,Sec и s100 присваиваются значения текущего часа,
минуты, секунды и сотой секунды, соответственно. Hour может быть от 0 до 23,
Min и Sec - от 0 до 59, а s100 - от 0 до 99.
procedure HALT[(ExitCode: Natural)];
Предназначение: Прекращение выполнения программы.
Действие: ExitCode - необязательный параметр и, если не указан, подразумевается 0.
Выполнение программы прекращается.
function HI(x: word): byte;
Предназначение: Получение старшего байта слова.
Действие: x - арифметическое выражение с размером в 1 слово. Результат типа byte и
представляет собою старший байт параметра.
function HIWORD(x: LongWord): word;
Предназначение: Получение старшего слова двойного слова.
Действие: x - арифметическое выражение с размером в 1 двойное слово. Результат типа
word и представляет собою старшee слово параметра.
procedure INC(var x [, n]);
Предназначение: Увеличение значения переменной.
Действие: x - переменная ординального типа; n - необязательное арифметическое
выражение. При выполнении процедуры переменной х присваивается значение,
равное старому, увеличенное на n, если n задано, или на 1, если n не задано.
procedure INCL(var s: set; x)
Предназначение: Включение элемента в множество.
Действие: s - переменная множественного типа, а x - элемент, принадлежащий базовому
типу множества. Эта процедура включает заданного элемента x в множество s,
т.е. INCL(s, x) эквивалентно s:= s + [x];
<<  <  GO  >  >>

Вернуться к началу сайта