5 lines
48 B
ObjectPascal
5 lines
48 B
ObjectPascal
var f : file of char;
|
|
|
|
begin
|
|
Write(f,'aa');
|
|
end. |