program bench2(input,output);

var
  i,j:integer;
  x,y : real;

begin
writeln('start', chr(7));
x := 0;
y := 9.9;
for i := 1 to 100 do begin
    x := 0;
    for j := 1 to 1000 do
       x := x+sin(arctan(cos(ln(y))));
end;
writeln('finish',x:8:3, chr(7));
end.