|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
30.11.2008, 13:14 | #1 |
Пользователь
Регистрация: 13.11.2008
Сообщений: 80
|
Решите задачку
Заданы вещественные числа x<>0, E>0. Вычислить сумму с точностью до Е(10^-6). Определить количество слагаемых. В процессе вычисления выдать на экран промежуточные результаты.
1 + Знак суммы(a(a-1)...(a-k+1))xk/k!, (E>0,|x|<1). k=1 |
30.11.2008, 13:29 | #2 | |
Участник клуба
Регистрация: 10.11.2008
Сообщений: 1,502
|
Цитата:
Код:
Нормальное состояние техники - нерабочее, все остальное частный случай.
|
|
30.11.2008, 14:14 | #3 |
Пользователь
Регистрация: 13.11.2008
Сообщений: 80
|
Так это код к моей задачке или нет?
|
30.11.2008, 14:16 | #4 |
Старожил
Регистрация: 13.10.2007
Сообщений: 2,740
|
С факториалом Вы дальше fact(12) не уедете. Здесь надо применить рекуррентное отношение.
|
30.11.2008, 14:17 | #5 |
Участник клуба
Регистрация: 10.11.2008
Сообщений: 1,502
|
НЕТ
Вам нужно вместо Код:
Нормальное состояние техники - нерабочее, все остальное частный случай.
|
30.11.2008, 14:20 | #6 |
Участник клуба
Регистрация: 10.11.2008
Сообщений: 1,502
|
Код:
Нормальное состояние техники - нерабочее, все остальное частный случай.
|
30.11.2008, 14:27 | #7 |
Пользователь
Регистрация: 13.11.2008
Сообщений: 80
|
а как записать знак суммы в функции или вообще мою функцию,я этого вообще не понимаю
|
30.11.2008, 14:30 | #8 |
Участник клуба
Регистрация: 10.11.2008
Сообщений: 1,502
|
суммирование происходит в цикле repeat until пока слагаемое не станет меньше 10^-6
Нормальное состояние техники - нерабочее, все остальное частный случай.
|
30.11.2008, 14:56 | #9 |
Старожил
Регистрация: 13.10.2007
Сообщений: 2,740
|
Вот нормальный код программы.
Код:
|
30.11.2008, 15:00 | #10 |
Пользователь
Регистрация: 13.11.2008
Сообщений: 80
|
Но этом коде оно бесконечно вводит икс и а
|
|
Опции темы | Поиск в этой теме |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Решите задачу(( | volk86 | Паскаль, Turbo Pascal, PascalABC.NET | 0 | 29.11.2008 19:47 |
Решите задачку на Delphi | evrey | Общие вопросы Delphi | 1 | 01.06.2008 21:47 |