program P335;{$APPTYPE CONSOLE}uses
  SysUtils;{ TODO -oUser -cConsole Main : Insert code here }
  type
  book=class(tobject)
  private
    title:string[20];
    author:string[20];
    publisher:string[20];
    price:real;  public
    constructor Create;
    destructor destroy;override;
    procedure display;
  end;
  constructor book.Create;
  begin
    inherited create;
  end;
  destructor book.destroy;
  begin
    inherited destroy;
  end;
  procedure book.display;
  begin
    writeln('title:'+title);
    writeln('author'+author);
    writeln('publisher by'+publisher);
    write('price');
    write(price:10:2);
  end;
  var
    delphibook:book;
begin
  delphibook:=book.create;
  delphibook.title:='mastering delphi';
  delphibook.author:='liuhaitao';
  delphibook.publisher:='not know';
  delphibook.price:=20.2
  delphibook.free;
end.给出的错误信息是missing operator or semicolon  什么意思