Неправильный код - PascalABC.NET

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

type
man=class
public
name:string;
age:integer;
howareyou:string;
end;
var
h:man;
begin
writeln('Привет,мне бы хотелось узнать о тебе побольше.');
write('Твою имя?');
readln(h.name);
write('Прекрасно, ',h.name, ', но сколько-же тебе лет?');
readln(h.age);
write('А какое твое сегодня настроение?');
readln(h.howareyou);
writeln('У тебя сегодня',h.howareyou,' настроение' );
end.

Вот код,но компилятор находит ошибкой фразу "readln(h.name);"

Решение задачи: «Неправильный код»

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

type
  man = class
  public 
    name: string;
    age: integer;
    howareyou: string;
  end;
 
begin
  var h := New man;
  writeln('Привет,мне бы хотелось узнать о тебе побольше.');
  write('Твою имя?');
  readln(h.name);
  write('Прекрасно, ', h.name, ', но сколько-же тебе лет?');
  readln(h.age);
  write('А какое твое сегодня настроение?');
  readln(h.howareyou);
  writeln('У тебя сегодня', h.howareyou, ' настроение' );
end.

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

Объявление типа данных man с полями name, age, howareyou
Создание экземпляра типа man с помощью оператора New и переменной h
Вывод приветствия и запроса имени
Чтение имени с помощью функции readln и сохранение в поле name объекта h
Вывод вопроса о возрасте и запроса на ввод возраста с помощью функции readln и сохранение в поле age объекта h
Вывод вопроса о настроении и запроса на ввод настроения с помощью функции readln и сохранение в поле howareyou объекта h
Вывод информации о возрасте и настроении с помощью функции writeln и использованием полей объекта h
Завершение программы