program p1;
var y,i:real;
 
begin
i:=1;
y:=sin(1);
while (i<2.01) do begin
i:=i+0.1;
y:=y+sin(i);
end;
 
writeln('Y= ',y:0:3);
readln;
end.