{In Delphi you can have variables of a range of sizes}
var B: Byte;		{8-bit, unsigned}
var C: char;		{ASCII character}
var SI: shortint;	{8-bit, signed}
var SM: Smallint;	{16-bit signed}
var LI: Longint;	{32-bit signed}
var W: word;		{16-bit unsigned}
var LW: Longword;	{32-bit unsigned}
var II: Int64;		{64-bit signed}
var SR: Real48;		{6-byte real}
var SN: single;		{4-byte real}
var DB: double;		{8-byte real}
var EX: Extended;	{10-byte real}
var CM: Comp;		{8-byte fixed point}
var CR: Currency;	{8-byte fixed point}

{You can also custom define the size range of variable}

type TNumRange = -128..127;
var NM: TNumRange;

type TUpperCase = 'A'..'Z';
var UP: TUpperCase;