Program Sin1;

{ Program to demonstrate the Sin function. }

begin
  Writeln (Sin(Pi): 0 : 1); { Prints 0.0 }
  Writeln (Sin(Pi / 2): 0 : 1); { Prints 1.0 }
end.