4.1cBSD/usr/doc/pascal/sin1.p
program sinout(output); begin write(sin(1,2)); end.