Помощь - Поиск - Пользователи - Календарь
Полная версия: Дано натуральное число n. Вычислить: 1/sin1+1/(sin1+sin2)+...+1/(sin1+sin2+...sinn)
Форум «Всё о Паскале» > Pascal, Object Pascal > Задачи
-Pavel-
Дано натуральное число n. Вычислить:
1/sin1+1/(sin1+sin2)+...+1/(sin1+sin2+...sinn)

Помогите пожалуйста вообще не знаю как делать=(((
Lapp
  s:=0;
t:=0;
for i:=1 to n do begin
t:=t+Sin(i);
s:=s+1/t
end;
WriteLn(s)
Гость
Цитата(Lapp @ 31.10.2007 10:19) *

  s:=0;
t:=0;
for i:=1 to n do begin
t:=t+Sin(i);
s:=s+1/t
end;
WriteLn(s)




спс огромное спс целую неделю мучался с этим
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.