18 lines
199 B
Text
18 lines
199 B
Text
|
program in out;
|
||
|
|
|
||
|
|
var
|
||
|
|
|
||
|
|
f : textfile;
|
||
|
|
|
||
|
|
begin
|
||
|
|
|
||
|
|
assignFile(f,'/output.txt');
|
||
|
|
rewrite(f);
|
||
|
|
close(f);
|
||
|
|
makedir('/docs');
|
||
|
|
assignFile(f,'/docs/output.txt');
|
||
|
|
rewrite(f);
|
||
|
|
close(f);
|
||
|
|
|
||
|
|
end;
|