Помогите пожалуйста!!! Pascal ABC
В третей строчке выдает ошибку, пишет "Неожиданный символ". Что делать?

VAR P:integer;
begin
write(’введите пароль’);
read (P);
if p:=1998 then write (’Молодец’) else write (’Пароль не верен’);
end.

  • Исправленная:
    VAR P:integer;
    begin
    write('введите пароль');
    read (P);
    if p=1998 then write ('Молодец') else write ('Пароль не верен');
    end.