RosettaCodeData/Task/File-input-output/PascalABC.NET/file-input-output.pas

5 lines
80 B
ObjectPascal

begin
var s := ReadAllText('input.txt');
WriteAllText('output.txt',s);
end.