Ошибка в разделе type - Pascal ABC

Формулировка задачи:

type
 User=class;
  puclic
   Nickname:string;
   Pass:integer;
   Group:string;
end;
var
 u:User;
begin
 u:=new User;
 writeln('Г„Г®ГЎГ°Г® ГЇГ®Г¦Г*Г«Г®ГўГ*ГІГј Гў Г±ГЁГ±ГІГҐГ¬Гі. ГЏГ°ГҐГ¤Г±ГІГ*ГўГјГІГҐГ±Гј, ГЇГ®Г¦Г*Г«ГіГ©Г±ГІГ*.');
 write('Г“ГЄГ*Г¦ГЁГІГҐ Г‚Г*Гё ГЇГ±ГҐГўГ¤Г®Г*ГЁГ¬: ')
 readln(u.Nickname);
 write('Г‡Г*Г¬ГҐГ·Г*ГІГҐГ«ГјГ*Г®, ', u.Nick_name, '. ГЏГ°ГЁГ¤ГіГ¬Г*Г©ГІГҐ ГЇГЁГ*-ГЄГ®Г¤ Г¤Г«Гї ГўГµГ®Г¤Г* Гў Г±ГЁГ±ГІГҐГ¬Гі.');
 readln(u.Pass);
 write('Г‚Г*Гё ГЇГ*Г°Г®Г«Гј: ', u.Pass, ' . Г“ГЄГ*Г¦ГЁГІГҐ ГЈГ°ГіГЇГЇГі ГЇГ®Г«ГјГ§Г®ГўГ*ГІГҐГ«ГҐГ©, ГЄ ГЄГ®ГІГ®Г°Г®Г© Г‚Г» ГЎГ» ГµГ®ГІГҐГ«ГЁ ГЎГ»ГІГј ГЇГ°ГЁГ·ГЁГ±Г«ГҐГ*Г»');
 readln(u.Group);
 write('Г‘ГЇГ*Г±ГЁГЎГ®, ГЇГ°Г®Г¶ГҐГ±Г± Г°ГҐГЈГЁГ±ГІГ°Г*Г¶ГЁГЁ Г®ГЄГ®Г*Г·ГҐГ*. Г‚Г*Гё ГЇГ±ГҐГўГ¤Г®Г*ГЁГ¬: ', u.Nickname, '; Г‚Г*Гё ГЇГЁГ*-ГЄГ®Г¤: ', u.Pass, '; Г‚Г*ГёГ* ГЈГ°ГіГЇГЇГ*: ', u.Group);
end.

Лог ошибки на третью строку: ожидалось равенство "=" Не совсем понимаю, в чём именно ошибка. Всё делал по канонам, так сказать. На несоответствие кодировки в основной части кода не обращайте внимания, она не столь важна. Очень надеюсь на вашу помощь!

Решение задачи: «Ошибка в разделе type»

Листинг программы

u := new User;

Объяснение кода листинга программы

Создается новый экземпляр класса User.
Переменная u ссылается на этот экземпляр.