4 lines
64 B
ObjectPascal
4 lines
64 B
ObjectPascal
var f : array[1..3] of Text;
|
|
begin
|
|
Assign(f[2],'test.txt');
|
|
end. |