Вывод поля записи Опции

[ofenod]

//Имеется тип - запись Student с полем pol:
type
Student=record
pol: (m,j);
end;

var
st1: Student;

begin
st1.pol:=m;
writeln(st1.pol);// Ошибка нельзя выводить данные этого типа
end.