Дано натуральное число n. Вычислить
Я начала делать на паскале, но не знаю, правильно ли и что делать дальше. Сложность именно в дроби и в том, что и к знаменателю, и к числителю прибавляются выражения. Если кому-то не сложно, подскажите, что делать дальше, как конкретно сделать этот цикл.
Вот мое скромное
var
n,s,i: integer;
begin
writeln('введите n');
readln(n);
if n<=0 then
writeln('ошибка введите натуральное число');
s:=0;
for i:=1 to n do
begin
s:=s*(cos(i)+cos(i+1))/(sin(i)+sin(i+1));