IPB
ЛогинПароль:

> Прочтите прежде чем задавать вопрос!

1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!

> Вычисление последовательностей, помогите плиз
Beauty_
сообщение 1.05.2007 11:33
Сообщение #1


Гость






Даны числовой ряд и некоторое число E. найти сумму тех членов ряда, модуль которых больше или равен заданному E. общий член ряда имеет вид
Прикрепленное изображение

М
Beauty, пожалуйста выбирай более экономные форматы. Я отредактировал (сравни: твой .bmp был 92К, этот .gif - всего лишь 1.4К).

 К началу страницы 
+ Ответить 
 
 Ответить  Открыть новую тему 
Ответов
Lapp
сообщение 2.05.2007 3:52
Сообщение #2


Уникум
*******

Группа: Модераторы
Сообщений: 6 823
Пол: Мужской
Реальное имя: Лопáрь (Андрей)

Репутация: -  159  +


Хорошо, продвигаемся вместе..
Вот примерно так это можно сделать (с учетом функций, приведенных выше)
S:=0;
n:=1;
repeat
a:=Power(2/n,n)*Factorial(n);
if a>=e then S:=S+a else break;
Inc(n)
until false;

Теперь стало понятнее? smile.gif


Добавил увеличение n - забыл в первый раз, извините

Сообщение отредактировано: Lapp - 2.05.2007 4:23


--------------------
я - ветер, я северный холодный ветер
я час расставанья, я год возвращенья домой
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

Сообщений в этой теме
Beauty_   Вычисление последовательностей   1.05.2007 11:33
kess   как решить такую задачу, со степенью и факториалом...   2.05.2007 3:17
Lapp   как решить такую задачу, со степенью и факториало...   2.05.2007 3:37
kess   Дальше понятно? не оч (((   2.05.2007 3:42
Lapp   Хорошо, продвигаемся вместе.. Вот примерно так это...   2.05.2007 3:52
kess   Хорошо, продвигаемся вместе.. Вот примерно так эт...   2.05.2007 4:04
Lapp   ну так ? :blink: что это значит?   2.05.2007 4:08
kess   ? :blink: что это значит? я уже мало что сообр...   2.05.2007 4:10
Lapp   я уже мало что соображаю :wacko: Скорее еще, а н...   2.05.2007 4:12
kess   Скорее еще, а не уже.. :) Написать всю прогу? ес...   2.05.2007 4:14
Lapp   Вот так - вроде должно работать (не проверял) func...   2.05.2007 4:21
kess   Вот так - вроде должно работать (не проверял) fun...   2.05.2007 4:39
Lapp   Но вообще-то это не лучший способ считать, посколь...   2.05.2007 4:45
-Volvo-   Возможно, только это совсем не то же самое, что тр...   2.05.2007 8:04
Lapp   А что ищется в последнем примере? [i](2[sup]1 * ...   2.05.2007 8:13
volvo   :ypriamii: Lapp, извини, немного не так прочитал ц...   2.05.2007 11:29
kess   а если так?? там возведение в степень +факториал.....   2.05.2007 20:42
volvo   А откуда ты знаешь, сколько элементов тебе надо бу...   2.05.2007 20:48
kess   А откуда ты знаешь, сколько элементов тебе надо б...   2.05.2007 21:00
Lapp   обычно любой можно задатьЭто как это?? :blink: ...   2.05.2007 22:18
kess   Это как это?? :blink: Обычно много чего можно.....   2.05.2007 22:33
Lapp   переменные обычно задаются по желанию... Замечат...   2.05.2007 22:42
volvo   kess, никогда не полагайся на то, что компилятор д...   2.05.2007 22:37
kess   с факториалом..... F:=1; for k:=1 to n do ...   2.05.2007 22:52
Lapp   ??? ...   2.05.2007 23:55
kess   ... в смысле так можно записать нахождение факто...   2.05.2007 23:57
Lapp   Да, годится. Только я бы умножение на F поставил в...   2.05.2007 23:57
kess   Да, годится. Только я бы умножение на F поставил ...   3.05.2007 0:02
Lapp   целое Вот это плохо. Тогда у тебя снова будет п...   3.05.2007 1:02
kess   Вот это плохо. Тогда у тебя снова будет проблема...   3.05.2007 1:05
мисс_граффити   Вот это плохо. Тогда у тебя снова будет проблема...   3.05.2007 10:18


 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 



- Текстовая версия 21.07.2025 6:49
Хостинг предоставлен компанией "Веб Сервис Центр" при поддержке компании "ДокЛаб"