Текущий архив: 2006.12.31;
Скачать: CL | DM;
Вниз
Подскажите пожалуйста как решить задачу: Найти похожие ветки
← →
Pascalman (2006-12-13 19:03) [0]Удалено модератором
Примечание: Восстановление закрытой ветки
← →
SergP © (2006-12-13 19:07) [1]попробуй так:
x1:=x;
s:=x1;
i:=1;
x2:=0;
while abs(x1+x2)>0.00001 do
begin
i:=i+2;
x2:=x1;
x1:=-x1*x*x/(i*(i-1));
s:=s+x1;
end;
не знаю, писал прямо в форум, так что и ошибиться мог...
← →
iXT © (2006-12-13 19:08) [2]
> Этот код не совсем верный
Здесь!
WMZ....? минут 5 после перечисления :).
Не вру, еще придется Паскаль поставить :)
← →
SergP © (2006-12-13 19:08) [3]далее:
writeln(s);
Writeln(sin(x));
Страницы: 1 вся ветка
Текущий архив: 2006.12.31;
Скачать: CL | DM;
Память: 0.44 MB
Время: 0.041 c
