program sinpi2; begin Write('Sin(PI/2) = ',sin(PI/2):2:2); Readln; end.