RosettaCodeData/Task/Quine/PascalABC.NET/quine.pas

## var a:='## var a:='';print(2*a[:12]+2*a[11:])';print(2*a[:12]+2*a[11:])