Помощь
-
Поиск
-
Пользователи
-
Календарь
Полная версия:
Дано натуральное число n. Вычислить: 1/sin1+1/(sin1+sin2)+...+1/(sin1+sin2+...sinn)
Форум «Всё о Паскале»
>
Pascal, Object Pascal
>
Задачи
-Pavel-
30.10.2007 2:19
Дано натуральное число n. Вычислить:
1/sin1+1/(sin1+sin2)+...+1/(sin1+sin2+...sinn)
Помогите пожалуйста вообще не знаю как делать=(((
Lapp
31.10.2007 14:19
s:=
0
; t:=
0
;
for
i:=
1
to
n
do
begin
t:=t+Sin(i); s:=s+
1
/t
end
; WriteLn(s)
Гость
12.10.2011 18:32
Цитата(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)
спс огромное спс целую неделю мучался с этим
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста,
нажмите сюда
.