Změny

{Blockrd.PAS}

{Vzorový příklad pro procedury BlockRead a BlockWrite.}

program CopyFile;

{ Prostý kopírovací program bez kontroly chyb }

{ Pro Windows: }

{ uses WinCrt; }

var

FromF, ToF: file;