Дано естественное число N. Вычислить:
S=1/sin1+1/(sin1+sin2)+ ... + 1/(sin1+sin2+...sinN).

Дано естественное число N. Вычислить:
S=1/sin1+1/(sin1+sin2)+ ... + 1/(sin1+sin2+...sinN).

Задать свой вопрос
1 ответ
var
s, ssin: real;
i, n: integer;
nbsp;
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.
, оставишь ответ?
Имя:*
E-Mail:


Последние вопросы

Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт