Дано натуральное число n. Составить программу вычисления значения выражения. Результат округлить до сотых.

begin
  var n:=ReadInteger('n=');
  if n<=0 then Writeln('s=0')
  else begin
    var ssin:=sin(1);
    var s:=1/ssin;
    for var i:=2 to n do begin ssin+=sin(i); s+=1/ssin end;
    Writeln('s=',s:0:2)
    end
end.


n= 5
s=8.85