Автор Наталия Булгакова задал вопрос в разделе Другие языки и технологии
Паскаль... Хелп 🙂 Составить программу для вычисления бесконечной суммы 1+1/(1!)+1/(2!)+1/(3!)+...+1/(n!)+... и получил лучший ответ
Ответ от Ёергей Бизон[гуру]
SUM=1
Цикл от 1 до n, где вычисляется SUM=SUM+1/FUN(n)
Функция FUN(n) вычисляет факториал n
Алгоритм понятен? Перевести его на любой язык плевое дело
А до бесконечности не получится - если запустить бесконечный цикл, произойдет переполнение стека и комп заглючит
Сергей Бизон
(212103)
Ну если есть встроенная функция, то да. А если нет, то как? Типа FACT = FACT+1 вычисление факториала в цикле? Можно и так, конечно.
Ответ от Darth Vader[гуру]
Бесконечную сумму на паскале, да и вообще на компьютере посчитать нельзя.. .
Ну а вообще вам нужно в цикле делать вычисления.
Что-то вроде этого:
slag:=1.0;
sum:=1.0;
eps:=0.00001; // нужная точность
i:=1;
while slag > eps do
begin
slag:=slag/i;
sum:=sum+slag;
i:=i+1;
end;
Бесконечную сумму на паскале, да и вообще на компьютере посчитать нельзя.. .
Ну а вообще вам нужно в цикле делать вычисления.
Что-то вроде этого:
slag:=1.0;
sum:=1.0;
eps:=0.00001; // нужная точность
i:=1;
while slag > eps do
begin
slag:=slag/i;
sum:=sum+slag;
i:=i+1;
end;
Ответ от Krab Вark[гуру]
Никаких проблем. Запросто считаем бесконечные суммы. Это разложение в ряд числа е 🙂
Итак,
begin writeln(exp(1):0:14); readln end.
Никаких проблем. Запросто считаем бесконечные суммы. Это разложение в ряд числа е 🙂
Итак,
begin writeln(exp(1):0:14); readln end.
Ответ от 3 ответа[гуру]
Привет! Вот подборка тем с похожими вопросами и ответами на Ваш вопрос: Паскаль... Хелп 🙂 Составить программу для вычисления бесконечной суммы 1+1/(1!)+1/(2!)+1/(3!)+...+1/(n!)+...