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

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

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

 
 Ответить  Открыть новую тему 
> Вычислить функцию!
-Maks-
сообщение 14.03.2006 18:43
Сообщение #1


Гость






Помогите, пожалуйста, решить задачу:

Вычислить с применением repeat ... until: b=1+(xlna)/1! + ((xlna)^2)/2! + ... + ((xlna)^n)/n!=a^x. Исходные данные: епсилон=0,01, х=3.0, альфа=2,5. Ответ: 15,62.
 К началу страницы 
+ Ответить 
мисс_граффити
сообщение 14.03.2006 18:52
Сообщение #2


просто человек
******

Группа: Модераторы
Сообщений: 3 641
Пол: Женский
Реальное имя: Юлия

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


Сам пробовал делать?

Что именно не получается?


--------------------
Все содержимое данного сообщения (кроме цитат) является моим личным скромным мнением и на статус истины в высшей инстанции не претендует.
На вопросы по программированию, физике, математике и т.д. в аське и личке не отвечаю. Даже "один-единственный раз" в виде исключения!
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
volvo
сообщение 14.03.2006 19:33
Сообщение #3


Гость






-Maks-, я, по-моему, уже ТЕБЕ же делал нечто подобное. Теперь сам... Идешь сюда:
FAQ: Общие вопросы по математике
и смотришь, как реализовано разложение в ряд... У тебя почти то же самое...
 К началу страницы 
+ Ответить 
Гость
сообщение 14.03.2006 21:01
Сообщение #4


Гость






мисс_граффити
Я не понял, что мне делать с епсилон и альфа и не знаю как описать факториал!

Цитата
-Maks-, я, по-моему, уже ТЕБЕ же делал нечто подобное.

Вообще-то нет, я на этом форуме недавно!
 К началу страницы 
+ Ответить 
MoM
сообщение 14.03.2006 21:09
Сообщение #5


Новичок
*

Группа: Пользователи
Сообщений: 16
Пол: Мужской

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


И ещё вопрос со следующей задачей:
1. Определить, является ли натуральное число N, вводимое с клавиатуры, степенью двойки. Задачу надо решить с помощью цикла For.
Как реализовать этот цикл?
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
volvo
сообщение 14.03.2006 21:22
Сообщение #6


Гость






MoM, я дал тебе ссылку, где объясняется, как решать первую задачу. БУДЬ ДОБР зайти в FAQ, и поискать хоть чуть-чуть! И второе задание тоже там есть!

На будущее: не надо делать в одном месте свалку вопросов. Одна тема - один вопрос.
 К началу страницы 
+ Ответить 
MoM
сообщение 14.03.2006 21:49
Сообщение #7


Новичок
*

Группа: Пользователи
Сообщений: 16
Пол: Мужской

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


Цитата
я дал тебе ссылку, где объясняется, как решать первую задачу. БУДЬ ДОБР зайти в FAQ

Спасибо за ссылку, зашёл, прочёл, буду разбираться!
А насчёт степени двойки там только это - is_power_2 := ((x and Pred(x)) = 0), а что это означает... И я не знаю как сделать эту задачу с циклом For.
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
мисс_граффити
сообщение 14.03.2006 21:52
Сообщение #8


просто человек
******

Группа: Модераторы
Сообщений: 3 641
Пол: Женский
Реальное имя: Юлия

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


про степень двойки - обязательно for?
по-моему,это здесь жутко неудобно.

можно, конечно, принудительно присваивать значение, соответствующее выходу из цикла, но это изврат...


--------------------
Все содержимое данного сообщения (кроме цитат) является моим личным скромным мнением и на статус истины в высшей инстанции не претендует.
На вопросы по программированию, физике, математике и т.д. в аське и личке не отвечаю. Даже "один-единственный раз" в виде исключения!
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
MoM
сообщение 14.03.2006 22:18
Сообщение #9


Новичок
*

Группа: Пользователи
Сообщений: 16
Пол: Мужской

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


Цитата
про степень двойки - обязательно for?

Да, обязательно! Весь смысл решения этой задачи именно в этом!
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
volvo
сообщение 14.03.2006 22:50
Сообщение #10


Гость






Смысла делать это через For не вижу по-прежнему... Но делается это так:
  readln(n);
count := 0;
for i := 0 to sizeof(n) * 8 - 1 do
if (n shr i) and 1 = 1 then inc(count);
writeln('Степень двойки? ', count = 1);
 К началу страницы 
+ Ответить 
мисс_граффити
сообщение 14.03.2006 23:13
Сообщение #11


просто человек
******

Группа: Модераторы
Сообщений: 3 641
Пол: Женский
Реальное имя: Юлия

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


если про двоичный сдвиг знают.
можно иначе.
некрасиво и извращенно.

for i:=1 to max do 
{конечная константа зависит от типа данных. какую макс. степень двойки можно представить...}
begin
if (n=1) then
begin
writeln('yes');
break;
end;

if (n mod 2)=0 then
n:=round(n/2)
else
begin
writeln('no');
break;
end;
end;

ноль, видимо, надо рассматривать отдельно... он степенью двойки не является.
n-очевидно, целое положительное (или отрицательные и дробные степени двойки тоже рассматривать?)

просьба камнями не кидаться.


--------------------
Все содержимое данного сообщения (кроме цитат) является моим личным скромным мнением и на статус истины в высшей инстанции не претендует.
На вопросы по программированию, физике, математике и т.д. в аське и личке не отвечаю. Даже "один-единственный раз" в виде исключения!
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
volvo
сообщение 14.03.2006 23:27
Сообщение #12


Гость






Цитата(мисс_граффити @ 14.03.2006 22:13)
n-очевидно, целое положительное (или отрицательные и дробные степени двойки тоже рассматривать?)

blink.gif blink.gif
Цитата(MoM @ 14.03.2006 20:09)
1. Определить, является ли натуральное число N, вводимое с клавиатуры, степенью двойки.
 К началу страницы 
+ Ответить 
MoM
сообщение 14.03.2006 23:51
Сообщение #13


Новичок
*

Группа: Пользователи
Сообщений: 16
Пол: Мужской

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


мисс_граффити
Спасибо, работает! А что означает эта строка - n:=round(n/2)?
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
мисс_граффити
сообщение 14.03.2006 23:56
Сообщение #14


просто человек
******

Группа: Модераторы
Сообщений: 3 641
Пол: Женский
Реальное имя: Юлия

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


Цитата(MoM @ 14.03.2006 23:51) *

мисс_граффити
Спасибо, работает! А что означает эта строка - n:=round(n/2)?

n присваиваем значение округленного n/2. Но поскольку сначала проверяем, что делится нацело, это сделано только для совместимости типов.

volvo, правила меняются по ходу игры...
вон, в соседней теме. сначала надо было посчитать количество выпавших 100... а теперь уже совсем другое сделать.

Сообщение отредактировано: мисс_граффити - 14.03.2006 23:57


--------------------
Все содержимое данного сообщения (кроме цитат) является моим личным скромным мнением и на статус истины в высшей инстанции не претендует.
На вопросы по программированию, физике, математике и т.д. в аське и личке не отвечаю. Даже "один-единственный раз" в виде исключения!
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
MoM
сообщение 15.03.2006 21:47
Сообщение #15


Новичок
*

Группа: Пользователи
Сообщений: 16
Пол: Мужской

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


Вот пробовал решить ф-цию:

Код
uses crt;
var delta,x,a,epsilon,b:real;
    i,k:Integer;
begin;
delta:=1;
b:=delta;
epsilon:=0.01;
k:=0;
readln(x,a);
repeat
inc(k);
delta:=exp(k*ln(x*ln(a)))/k;
b:=b+delta;
until (delta>epsilon);
writeln(b);
readln;
end.


Как описать факториал?
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
volvo
сообщение 15.03.2006 21:53
Сообщение #16


Гость






MoM, пойми, я не просто так дал тебе ссылку на разложение в ряд... Тебе как таковой файториал не нужен! Смотри:
x0 = 1
x1 = x*lna / 1
x2 = (x*lna)^2 / 2! = x1 * (x*lna) / 2
x3 = (x*lna)^3 / 3! = x2 * (x*lna) / 3
...

Понимаешь? Это и есть рекуррентная последовательность - зная предыдущий элемент вычисляешь последующий... А иначе, например, при вычислении 14-го элемента последовательности (если он был бы тебе нужен), тебя бы ждал сюрприз smile.gif Факториал-то не помещается даже в LongInt ...
 К началу страницы 
+ Ответить 

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

 



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