langs a-z
This commit is contained in:
parent
db842d013d
commit
d066446780
11389 changed files with 98361 additions and 1020 deletions
17
Task/Create-a-file/Pascal/create-a-file.pascal
Normal file
17
Task/Create-a-file/Pascal/create-a-file.pascal
Normal file
|
|
@ -0,0 +1,17 @@
|
|||
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;
|
||||
Loading…
Add table
Add a link
Reference in a new issue