xref: /original-bsd/usr.bin/pascal/USD.doc/sin2.p (revision e59fb703) 
1program sinout(output);
2begin
3
4
5
6
7
8
9
10
11
12write(sin('*'));
13end.
14