Partial Pascal

Subset of Pascal for the ZX81/TS 1000. Includes if, then, else, case, of, otherwise, while, do, repeat, until, for, to, downto, begin and end for program control; read, readln, write, writeln, reset, rewrite, eoln, eof, inkey and text for input and output; +, *, div, mod, abs, chr, odd, ord, pred, succ and sqr for