Source: Peter Grogono's "Programming in PASCAL" Addison Wesley 1980