unit construnit1;

type
  t1=class
    
    class constructor := exit;
    private constructor := exit;
    public constructor(b:byte) := exit;
  end;

end.