Language:
Русский
English
{Assign.PAS}
▀▀▀▀▀▀▀▀▀▀▀▀▀▀
{Sample code for the Assign procedure. Try redirecting this program from
DOS to PRN to disk file, etc.}
var F: Text;
begin
Assign(F, ''); { Standard output }
Rewrite(F);
Writeln(F, 'standard output...');
Close(F);
end.