Mail

В этот день много лет назад...
16 апреля. В 1866 году (158 лет назад) - Революционер-террорист Триневецкий у Летнего сада стреляет в императора Александра II, но промахивается. Позже суд приговорит его к смертной казни через повешение.

Turbo Pascal Documentation

Функция MemAvail

     Функция: Возвращает число свободных блоков в динамичес-
ки распределяемой области памяти.
     Описание: MemAvail
     Тип результата: Длинный целый (longint).
     Примечания: Данное число определяется путем путем  сло-
жения  размеров  всех  свободных  блоков, расположенных ниже
указателя динамически распределяемой области памяти, с  объ-
емом  свободной памяти, расположенной выше указателя динами-
чески распределяемой области. Заметим, что пока нет  обраще-
ний к процедурам Dispose и FrееМем, из-за фрагментации дина-
мически распределяемой области памяти маловероятно, что  бу-
дет  доступен  блок  памяти,  размер  которого соответствует
возвращаемому значению. Для  получения  размера  наибольшего
свободного блока используйте функцию МахАvail. С помощью ди-
рективы компилятора {М} в вашей программе можно  определить
максимальные  и минимальные требования к динамически распре-
деляемой области памяти (см. Приложение С).
     Отличия: В версии 3.0 возвращаемое значение имело целый
тип и представляло собой число свободных параграфов.
     Прочее: См. также функцию МахАvail.
     Пример:

  begin
    Writeln('Доступно ', MemAvail, 'байтов');
    Writeln('Наибольший свободный блок равен ', MaxAvail,
    ' байтов');
end.