Помогите срочно решить задачу В Pascal S=1/2-2/3+3/4-5/6+.... Цикл
Помогите срочно решить задачу
В Pascal
S=1/2-2/3+3/4-5/6+....
Цикл
Гость
Ответ(ы) на вопрос:
Гость[latex]var \ i,n:integer;\\ s:real;\\ begin\\ s:=0;\\ n:=10; \\ for \ i:=1\ to\ n \ do \\ \ \ s:=s+power(-1,i \ div \ 2)*(i/(i+1));\\ writeln(s);\\ end.\\[/latex]
n-необходимая точность, 1000 хватает вполне (для типа реал)
Не нашли ответ?
Похожие вопросы