Новые сообщения · Правила  
  • Страница 1 из 1
  • 1
Модератор форума: Berestovskiy  
нужна помощ с задачой в паскале
собствено само задание http://i.imgur.com/QpMSO.png
Зарание благодарен тому кто поможет)

Добавлено (03.10.12, 21:14)
---------------------------------------------
Нужно на завтра!)СОС хелп)


1kurs kak 1 mirovaya
1 | Автор: sensation | 2012-10-03, 21:14   |  Репутация: [ + 1 ]
Задание сюда пиши

Нужна помощь? Сюда: vkontakte.ru/berestovskiy
2 | Автор: Berestovskiy | 2012-10-04, 01:30   |  Репутация: [ + 211 ]


Нужна помощь? Сюда: vkontakte.ru/berestovskiy
2 | Автор: Berestovskiy | 2012-10-04, 01:30   |  Репутация: [ + 211 ]
Необходимо вычислить сумму ряда с заданной точностью. Полученное значение проверить с помощью контрольной функции в точке. Условие на рисунке.
http://www.cyberforum.ru/attachment.php?attachmentid=187518&d=1349269553


1kurs kak 1 mirovaya
3 | Автор: sensation | 2012-10-04, 08:39   |  Репутация: [ + 1 ]
читай выше

Нужна помощь? Сюда: vkontakte.ru/berestovskiy
4 | Автор: Berestovskiy | 2012-10-04, 21:37   |  Репутация: [ + 211 ]
var
i,n:integer;
e,x,y,h,nf,summa,sym,s:real;
begin
e:=1e-4; x:=0.9;
y:=ln(x)/2;
writeln('y=',y:8:6);
summa:=0;
s:=1;
h:=x+1;
sym:=x-1;
nf:=x+1;n:=0;
while abs(s)>=e do begin
s:=sym/nf ; sym:=sym*sqr(x-1);h:=h*sqr(x+1);
n:=n+1; nf:=(2*n+1)*h;
summa:=summa + s; end;
writeln('sum=',summa:8:6);
End.


1kurs kak 1 mirovaya
5 | Автор: sensation | 2012-10-10, 20:31   |  Репутация: [ + 1 ]
  • Страница 1 из 1
  • 1
Поиск: