Ещё задачка, Вычислить сумму первых n членов ряда |
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code], либо быть опубликованы на нашем PasteBin в режиме вечного хранения.
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
Ещё задачка, Вычислить сумму первых n членов ряда |
StudentTNGU |
Сообщение
#1
|
Гость |
Наконец-то все решил. Почти.. Вот осталась эта задачка. Я пытался делать по примеру, но в примере тока плюсы и там проще.. А в задании сложнее. Че то я немного не понял... Поскажите как?
Вычислить сумму первых n членов ряда 1 - 1/1 + 1/3 - 1/5 +... Help me please.. |
Гость |
Сообщение
#2
|
Гость |
Извините за такую наглость )
|
volvo |
Сообщение
#3
|
Гость |
StudentTNGU, это - знакопеременный ряд... Так что, придется хранить знак очередного элемента...
s := 1; sign := -1; |
StudentTNGU |
Сообщение
#4
|
Гость |
|
volvo |
Сообщение
#5
|
Гость |
S само собой - вещественного, ибо есть деление, а Sign достаточно чтобы был Integer... Хотя нет, даже ShortInt подойдет (один байт экономия)
|
StudentTNGU |
Сообщение
#6
|
Гость |
вот. Надеюсь все верно? а то что он выдает 1.000000000000E+00 это нормально? так и должно быть? |
klem4 |
Сообщение
#7
|
Perl. Just code it! Группа: Пользователи Сообщений: 4 100 Пол: Мужской Реальное имя: Андрей Репутация: 44 |
Цитата Надеюсь все верно? А n-то у тебя чему равно ? Цитата а то что он выдает 1.000000000000E+00 это нормально? Это нормально В экспоненциальной форме просто, поставь Writeln('Summa elementov ryada ravna: ',s:5:3); -------------------- perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
|
Гость |
Сообщение
#8
|
Гость |
|
StudentTNGU |
Сообщение
#9
|
Гость |
Вот! Сделал как в примере. Работает. Вроде правильно? |
Гость |
Сообщение
#10
|
Гость |
Это точно решение этой задачи Вычислить сумму первых n членов ряда 1 - 1/1 + 1/3 - 1/5 +... ??? |
volvo |
Сообщение
#11
|
Гость |
Ну, давай еще раз 15 переспросим
А это ТОЧНО то, что тебе нужно? Может у тебя задание другое, и ты его неправильно прочел? |
StudentTNGU |
Сообщение
#12
|
Гость |
Понятно... Я на другом форуме по турбо паскалю тоже попросил помочь с этой задачкой. Там мне написали код. Вот он:
Он совсем другой и результаты работы получаются разные... Кому верить? Как правильно? |
klem4 |
Сообщение
#13
|
Perl. Just code it! Группа: Пользователи Сообщений: 4 100 Пол: Мужской Реальное имя: Андрей Репутация: 44 |
А провести ручной расчет и убедиться что на другом форуме тебя обманули не судьба ?
Пуск -> Программы -> Стандартные -> Калькулятор удачи. -------------------- perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
|
мисс_граффити |
Сообщение
#14
|
просто человек Группа: Пользователи Сообщений: 3 641 Пол: Женский Реальное имя: Юлия Репутация: 55 |
или головой подумать, что в задании про четные знаменатели вообще ни слова нет....
-------------------- Все содержимое данного сообщения (кроме цитат) является моим личным скромным мнением и на статус истины в высшей инстанции не претендует.
На вопросы по программированию, физике, математике и т.д. в аське и личке не отвечаю. Даже "один-единственный раз" в виде исключения! |
Текстовая версия | 13.11.2024 18:35 |