Вопрос, который вызвал трудности
Дано натуральное число N. Вычислить: S=1/sin1+1/(sin1+sin2)+ ... + 1/(sin1+sin2+...sinN). (программа Паскаль)
Ответ экспертов Учись.Ru
Чтобы дать полноценный ответ, был привлечён специалист, который хорошо разбирается в теме «ЕГЭ (школьный)». Ваш вопрос звучал так: Дано натуральное число N. Вычислить: S=1/sin1+1/(sin1+sin2)+ ... + 1/(sin1+sin2+...sinN). (программа Паскаль)
После обсуждения с другими специалистами сервиса мы пришли к выводу, что правильный ответ на ваш вопрос будет звучать следующим образом:
var
s, ssin: real;
i, n: integer;
begin readln(n);ssin := 0;s := 1;
for i := 1 to n do
begin ssin := ssin + sin(i);s := s * 1 / ssin;
end;
writeln(s);
end.
s, ssin: real;
i, n: integer;
begin readln(n);ssin := 0;s := 1;
for i := 1 to n do
begin ssin := ssin + sin(i);s := s * 1 / ssin;
end;
writeln(s);
end.