blob: 898d917e35a8012e2d473faf376c956123cb0b5f (
plain)
1
2
3
4
5
6
7
8
9
10
11
|
Program Example39;
{ Program to demonstrate the radtograd function. }
Uses math;
begin
writeln(radtograd(2*pi):8:6);
writeln(radtograd(pi):8:6);
writeln(radtograd(pi/2):8:6);
end.
|