Помогите срочно решить задачу В Pascal S=1/2-2/3+3/4-5/6+.... Цикл

0 голосов
45 просмотров

Помогите срочно решить задачу
В Pascal
S=1/2-2/3+3/4-5/6+....
Цикл

Информатика (15 баллов) | 45 просмотров
Дан 1 ответ
0 голосов
Правильный ответ
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.\\
n-необходимая точность, 1000 хватает вполне (для типа реал)
(5.2k баллов)
Похожие задачи