Помощь - Поиск - Пользователи - Календарь
Полная версия: вычислить сумму ряда
Форум «Всё о Паскале» > Pascal, Object Pascal > Задачи
Лось
Народ, помогите сделать лабу!!! Ни чего не рублю ато...

С точностью ξ (eps) вычислить сумму ряда у(х);

у(1) (х) – вычислить по формуле
ех=1+х/1!+х^2/2!+х^3/3!+…+
IxI <1

Большой Спасиб!
volvo
А в чем собственно была проблема?

const
 eps = 0.0001;

var
 x, sum, next: real;
 count: integer;

begin
 write('x = '); readln(x);

 sum := 0;
 next := 1; count := 1;
 repeat
   next := next * x / count;
   inc(count);
   sum := sum + next;
 until next < eps;

 writeln('f(x) = ', sum:10:7)
end.

Лось
Пасиб!

Проблема - я учусь в 6 классе, и я тут типа подрабатываю - делаю лабы студентам... С алгеброй пока торможу sad.gif
Altair
Цитата
и я тут типа подрабатываю - делаю лабы студентам

angry.gif
Значит делаешь за деньги а тут все получаешь за спасибо?
не стыдно?
volvo
Лось
Как же ты делаешь что-то, если элементарных вещей не знаешь? Учил бы Паскаль, что-ли... Алгебра-то тут ни при чем, все формулы готовы.
Altair
Цитата
Как же ты делаешь что-то, если элементарных вещей не знаешь?

Присоединяюсь к вопросу.
Очень интересно.
Флогримм
Цитата
Проблема - я учусь в 6 классе, и я тут типа подрабатываю - делаю лабы студентам... С алгеброй пока торможу

э-э-э... в 6м?? э-э-э... лабы????????
:no: blink.gif blink.gif blink.gif sad.gif sad.gif unsure.gif unsure.gif
у-у-у неврубаю
Altair
Только он уже не вернется... и не ответит на вопрос.
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.