Язык:
Русский
English
{ Пример программы для функции DiskFree }
uses Dos, Crt;
begin
WriteLn('Свободно ', DiskFree(0) div 1024, ' кбайт.');
end.
begin
WriteLn('Свободно ', DiskFree(0) div 1024, ' кбайт.');
end.
 Diskfree.PAS |
Правила форума :: Скачать Pascal :: FAQ // Ада–2020 :: Скачать GNAT :: OEM–2015 :: Ada -> C/C++
|
|
|
|
|
|
Код для вставки:
 ::
 ::
 ::
ГОСТ ::
Поделиться:
|
|