Имеются описания:
type season = (winter, spring, summer, autumn);
var x, y: season;
t: (warmth, hot);

Какие присваивания допустимы?
y:=t;
y:=pred(winter);
x:=pred(spring);
t:=cold;
t:=warmth;