|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
28.08.2009, 22:16 | #1 |
Пользователь
Регистрация: 15.04.2009
Сообщений: 19
|
Помогите найти сумму....
Помогите добить задачку....что то не выходит...выдает математическую ошибку при проверке...
найти сумму n элементов бесконечного ряда с y=-4+8-16+32-64..... вот код: var i,j,zn,n:integer; s:real; begin clrscr; writeln; writeln('naiti summy elementov riada: y=-4+8-16+32-64...'); writeln(''); writeln('vvedite kolichestvo elementov ryada'); write('N='); readln(n); s:=1; for i:=1 to n do begin zn:=1; for j:=1 to i+1 do begin zn:=zn*(-1); end; s:=s+(-zn*(exp(1+i)*ln(2))); end; writeln('summa ryada s=',s:3:0); readln; end. |
28.08.2009, 23:26 | #2 |
В тени
Старожил
Регистрация: 19.12.2008
Сообщений: 5,788
|
Зачем вам два цикла? Зачем что-то в степень возводите?
Код:
Код:
Вполне очевидно, чтобы что-то понять, необходимо книги читать.
Не нужно плодить бессмысленных тем. Вас Поиск избавит от многих проблем. ___________________________________ ___________________________________ _______ [=Правила форума=]_____[Поиск]_____[Литература по С++]____[Литература. Паскаль] Последний раз редактировалось Sazary; 28.08.2009 в 23:32. |
28.08.2009, 23:48 | #3 |
Пользователь
Регистрация: 15.04.2009
Сообщений: 19
|
Спасибо за быстрый ответ.....
Подскажите пожалуйста, а если ряд:у=-(1/2-2/5)+(2/3+4/10)-(3/4-8/15), то ка в данном случае организовать работу цикла? |
29.08.2009, 00:23 | #4 |
В тени
Старожил
Регистрация: 19.12.2008
Сообщений: 5,788
|
Код:
Вполне очевидно, чтобы что-то понять, необходимо книги читать.
Не нужно плодить бессмысленных тем. Вас Поиск избавит от многих проблем. ___________________________________ ___________________________________ _______ [=Правила форума=]_____[Поиск]_____[Литература по С++]____[Литература. Паскаль] |
29.08.2009, 13:46 | #5 | |
Пользователь
Регистрация: 15.04.2009
Сообщений: 19
|
Цитата:
заранее благодарю.... |
|
29.08.2009, 14:21 | #6 |
Форумчанин
Регистрация: 30.07.2009
Сообщений: 256
|
Тоже самое, только поменять цикл:
Код:
|
29.08.2009, 14:22 | #7 |
Форумчанин
Регистрация: 30.07.2009
Сообщений: 256
|
упс, не так, а вот так:
Код:
|
29.08.2009, 18:11 | #8 |
Пользователь
Регистрация: 15.04.2009
Сообщений: 19
|
Благодарю! спасибо за помощь!!!!
|
29.08.2009, 22:00 | #9 |
Пользователь
Регистрация: 15.04.2009
Сообщений: 19
|
|
30.08.2009, 07:03 | #10 |
Пользователь
Регистрация: 24.08.2009
Сообщений: 42
|
вот так попробуйте
Код:
icq 580047636 You're WELCOME!!!
|
Опции темы | Поиск в этой теме |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Найти сумму ряда | 11111 | Помощь студентам | 14 | 01.11.2010 19:55 |
Помогите найти алгебрасическую сумму!на паскале | vdv08 | Помощь студентам | 4 | 07.11.2008 00:19 |
найти сумму элементов строки | jenja | Общие вопросы Delphi | 2 | 02.04.2008 17:49 |
Найти сумму ряда с точностью Е=10^-3 | Добрый Кот | Паскаль, Turbo Pascal, PascalABC.NET | 2 | 12.12.2007 12:04 |