Template:Basic Pascal Tutorial/Chapter 5/Subranges