Ошибка в программе - PascalABC.NET (24771)

program P1;
 
type
  Individ = class
    FIO: string;
    Document: string;
  public 
    constructor Create(nFIO, nDOc: string);
    begin
      FIO := nFIO;
      Document := nDoc;
    end;
    
    procedure Print;
    begin
      writeln('ФИО: ', FIO, ' Документ: ', Document);
    end;
  end;
  Rebenok = class(Individ)
    FIO: string;
    Document: string;
  public 
    constructor Create(nFIO, nDOc: string);
    begin
      FIO := nFIO;
      Document := nDoc;
    end;
    
    procedure Print;
    begin
      writeln('ФИО:', FIO, 'Документ:', Document);
    end;
  end;
  
  Vzroslii = class(individ)
    FIO, Document, mesto_rab: string;
    constructor Create(nFIO, nDOc, nmesto: string);
    begin
      inherited Create;
      FIO := nFIO;
      Document := nDoc;
      mesto_rab := nmesto;
    end;
    
    procedure Print;
    begin
      inherited Print;
      writeln('ФИО: ', FIO, ' Документ: ', Document, 'Место работы:', mesto_rab);
    end;
  end;
 
var
  R: rebenok;
  V: Vzroslii;
  F, D, M: string;
 
begin
  Writeln('введите данные о ребенке');
  R := Rebenok.Create; ;//создаем экземпляр класса
  Writeln('- введите ФИО: ');readln(F);
  writeLn('- введите документ: ');readln(d);
  R := Rebenok.Create(F, d);//присваиваем значения его полям
  Writeln('введите данные о взрослом');
  V := Vzroslii.Create; ;//создаем экземпляр класса
  Writeln('- введите ФИО: ');readln(F);
  Writeln('- введите документ: ');readln(d);
  Writeln('- введите место работы: ');readln(m);
  V := Vzroslii.Create(F, d, m);//присваиваем значения его полям
  writeln('Введенные сведения:'); writeln('Введенные сведения о ребенке:');
  R.Print; 
  writeln('Введенные сведения о взрослом:');
  V.Print; 
end.