Language:
Русский
English
{Diskfree.PAS}
▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀
{Sample code for the DiskFree function.}
uses WinDos,WinCrt;
begin
Writeln(DiskFree(0) div 1024, ' Kbytes free ');
end.
 Diskfree.PAS |
Правила форума :: Скачать Pascal :: FAQ // Ада–2020 :: Скачать GNAT :: OEM–2015 :: Ada -> C/C++
|
|
|
|
|
|
Код для вставки:
 ::
 ::
 ::
ГОСТ ::
Поделиться:
|
|