|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
22.12.2008, 22:58 | #1 |
Пользователь
Регистрация: 22.12.2008
Сообщений: 59
|
Найти сумму 10 членов ряда, в котором An=(n!)/n^2
программа в Delphi:
Найти сумму 10 членов ряда, в котором An=(n!)/n^2. Пожалуйста помогите решить после завтра у меня сессия. А я не могу понять как ее решить! ПОЖАЛУЙСТА! |
23.12.2008, 04:41 | #2 |
Банхаммер
Участник клуба
Регистрация: 17.02.2007
Сообщений: 1,754
|
в чем возникает проблема7 создай массив от 0 до 9 заполни его числами и далее берешь N'ный элемент из массива и далее по формуле... для возведения во 2ю степерь пиши так: a[n]:=a[n]*a[n];
|
23.12.2008, 09:44 | #3 |
Пользователь
Регистрация: 22.12.2008
Сообщений: 59
|
Проблема возникает когда я начинаю писать код. Незнаю с чего начать. :-(
Помогите ПОЖАЛУЙСТА :-) |
23.12.2008, 11:42 | #4 |
Пользователь
Регистрация: 22.12.2008
Сообщений: 59
|
ПОМОГИТЕ ПОЖАЛУЙСТА!
Это последняя задача которую мне осталось решить. А ТО МЕНЯ ЗАВТРА НЕ ДОПУСТЯТ К СЕССИИ. :-((( |
23.12.2008, 11:58 | #6 |
Банхаммер
Участник клуба
Регистрация: 17.02.2007
Сообщений: 1,754
|
у тебя же во всех 3х заданиях одно по одному:
1) заполнение массива числами 2) возведение в степень 3) сложение элементов массива 4) работа с формулами все элементарно и просто... нужно всего лишь немного подумать... я конечно могу сделать но что это тебе даст7 тебя все равно завалят на сессии т.к. ты не сможешь объяснить как работает программа... P. S. я ж еще в своем первом посту объяснил как че делать Последний раз редактировалось KORN; 23.12.2008 в 12:01. |
23.12.2008, 12:22 | #7 |
Пользователь
Регистрация: 22.12.2008
Сообщений: 59
|
Я ее разберу хорошо. Напиши пожалуйста?
|
23.12.2008, 12:48 | #8 |
Банхаммер
Участник клуба
Регистрация: 17.02.2007
Сообщений: 1,754
|
var
a: array [0..9] of real; i: integer; r: real; begin for i:=0 to 9 do begin randomize; a[i]:=random(100); end; for i:=0 to 9 do A[i]:=(n!)/(i*i); // несовсем понял формулу... т.к. в Delphi ( ! ) не используется, так что подставь сама как и че тебе надо for i:=0 to 9 do r:=r+a[i]; end; выводишь результат и теоретически все... осталось дело за малым... тут ты уже сама должна справиться... Последний раз редактировалось KORN; 23.12.2008 в 12:53. |
23.12.2008, 12:55 | #9 |
Форумчанин
Регистрация: 28.09.2008
Сообщений: 344
|
Лови может поможет
|
23.12.2008, 13:10 | #10 |
Пользователь
Регистрация: 22.12.2008
Сообщений: 59
|
ОГРОМНОЕ СПАСИБО ЗА ПОМОЩЬ!
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Найти сумму ряда | 11111 | Помощь студентам | 14 | 01.11.2010 19:55 |
Вычислить бесконечную сумму ряда С++ | Fishka | Общие вопросы C/C++ | 9 | 22.12.2008 18:23 |
сумма всех начальных членов ряда, значение которых не меньше заданного числа e, 0<e<1 | Арчи | Помощь студентам | 2 | 20.12.2008 12:39 |
Вычислить сумму ряда | Alex1991 | Помощь студентам | 1 | 09.11.2008 19:22 |
Найти сумму ряда с точностью Е=10^-3 | Добрый Кот | Паскаль, Turbo Pascal, PascalABC.NET | 2 | 12.12.2007 12:04 |