Using Turbo Pascal: program CSI; uses Turbo Pascal - Berlinger, Eli (1991)