{ > src.triglog } program triglog (input,output); var i,t1,t2 : integer; x,y : real; begin x := 0.0; y := 9.9; t1 := time; for i := 1 to 10000 do begin x := x + sin(arctan(cos(ln(y)))); end; t2 := time; writeln('Finish',t2-t1,x) end.