Правила форума
Close.PASLanguage:
Русский
English
{Close.PAS}
▀▀▀▀▀▀▀▀▀▀▀▀▀
{Sample code for the Close procedure.}
var F: file;
begin
Assign(F, '\AUTOEXEC.BAT'); { open file }
Reset(F, 1);
Writeln('File size = ', FileSize(F));
Close(F); { Close file }
end.
::
::
::
