freepascal.compiler/docs/linuxex/ex44.pp

Program Example44;

{ Program to demonstrate the Octal function. }


begin
//  Writeln ('Octal(666) : ',octal(666));
  Writeln (' &666      : ',&666);		// 1.9.x+ functionality, octal is not necessary anymore
end.