|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
01.04.2008, 21:58 | #1 |
Регистрация: 01.04.2008
Сообщений: 8
|
Цикл с заданным числом повторений
Для заданного Х, числа слагаемых или n вычислить следующее:
S=2*(x+X^3\3+x^5\5+x^7\7+...+x^2n+1 \(2n+1)), x<1 Помогите пожалуйста, то я воще ничего не понимаю в програмировании(( |
01.04.2008, 23:33 | #2 |
Пользователь
Регистрация: 31.03.2008
Сообщений: 10
|
procedure aaaaa;
var i,n:integer; a,s,x:real; begin if n=0 then begin s:=2*x; вывод результата end; if n=1 then begin s:=2*(x+(exp((3)*ln(x))/3)); вывод резудьтата end; if n > 1 then begin s:=x; for i:= 1 to n-1 do begin s:=s + (exp((2*i+1)*ln(x))/(2*i+1)); end; s:=2*s; вывод результата end; пояснения: a^b = exp(ln(a^b)) = exp(b*ln(a)) причём по условию x<0 это на delphi (паскаль) можно и по другому, просто первое в голову пришло Последний раз редактировалось cheldonec; 01.04.2008 в 23:43. Причина: нашел ошибку |
02.04.2008, 08:44 | #3 |
Старожил
Регистрация: 13.10.2007
Сообщений: 2,740
|
Приведенный выше код содержит массу ошибок и неверных суждений.
Нам нужно найти сумму ряда, выраженного формулой S=2*(x+X^3/3+x^5/5+x^7/7+...+x^(2n+1)/(2n+1)), при x<1. Мы должны рассмотреть два варианта, когда х>0 и x<0, поскольку логарифм отрицательных чисел считается не так, как положительных. Кроме того n не может быть рано 0, т.к. это количество слагаемых, если их нет , то и S=0; Зачем отдельно считать при n=1? Почему i:=1 to n-1, и так далее. Привожу нормальный пртестированный код. Код:
|
02.04.2008, 21:00 | #4 |
Регистрация: 01.04.2008
Сообщений: 8
|
спасибо большое, завтра попробую сдать))
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Массив без повторений | Uzenec | Помощь студентам | 2 | 17.01.2008 08:23 |
массив с заранее неизвестным числом элементов | Var17 | Общие вопросы Delphi | 4 | 29.12.2007 08:20 |
Цикл с предусловием. ( цикл while) Цикл с постусловием. (цикл repeat ... until) | Mr.User | Помощь студентам | 9 | 23.11.2007 01:34 |
Суммирование ячеек с заданным шагом | valerij | Microsoft Office Excel | 10 | 10.10.2007 00:22 |