[roman]

Código Delphi [-]
constructor Estudiante.InitE (N,A,ES:string; E:integer);
begin
  Init(N, A, E);

  {
    código propio de Estudiante
  }
end;

Código Delphi [-]
var
  est: Estudiante;

begin
  est := Estudiante.InitE('valor N', 'valor A', 'valor ES', valorE);
end;

// Saludos