--programa que verifica el rango estatico del for al momento de compilacion


package errorfor is
	c:character;
	i:integer;
begin

	--for i in 10..8 loop --rango erroneo del for 10>8
	for i in reverse 10..8 loop -- 10>8 recordar que reverse 
		c:='a'; 				--invierte el rango no debe ser invertido explicitamente
	end loop;
end ;
