Speaking PASCAL - Bowen, Kenneth A. (rz1, 1981)