type enumtype = (One, two, three, forty:=40, fifty);

begin
end.