pascal
/
freepascal.compiler
peilaus alkaen https://gitlab.com/freepascal.org/fpc/source.git


			
				
					
						
						
							12345678
							type
  week=(mon,tue,wed);
Var
    w : week;
    w1 : mon..tue;
begin
  w1:=w;
end.