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

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

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

 
 Ответить  Открыть новую тему 
> Вычисление целого корня N-ой степени, задачка!
сообщение
Сообщение #1


Новичок
*

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

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


Здравствуйте... Я сам "не местный" - мозгов мало... а жить хочется...помогиииите христа радиsmile.gif :D :D :D
вот задачка (даю в виде изображения)
http://epr2.stsland.ru/2.jpg
Прикрепленное изображение

и ответ этой задачки...
http://epr2.stsland.ru/1.jpg
Прикрепленное изображение

и как уже понятно, надо ето реализоватть на Паскале.... smile.gif rolleyes.gif rolleyes.gif rolleyes.gif
пасиба, пока...

Сообщение отредактировано: volvo -
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #2


Perl. Just code it!
******

Группа: Пользователи
Сообщений: 4 100
Пол: Мужской
Реальное имя: Андрей

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


корень н-ной степени можно посчитать вот так :
exp((1/n)*ln(a))


--------------------
perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #3


Гость






klem4, а ты задание смотрел?
Мало ли, КАК можно что сделать? Можно и базу данных самому не писать, а зачем Access придумали? Но есть один маленький фактор: ЗАДАНИЕ.

Так вот, по заданию нужно найти корень методом Ньютона. А твоим методом - ну, попробуй вычислить корень 5-ой степени из (-32)...
 К началу страницы 
+ Ответить 
сообщение
Сообщение #4


Perl. Just code it!
******

Группа: Пользователи
Сообщений: 4 100
Пол: Мужской
Реальное имя: Андрей

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


может вот это ?

{$n+}
uses crt;
var n,k:integer;
eps,d,x,y:extended;
begin
clrscr;
write('eps='); readln(eps);
write('n=');readln(n);
write('x=');readln(x);
k:=0;
y:=x;
repeat
d:=(x/exp((n-1)*ln(y))-y)/n;
k:=k+1;
y:=y+d;
until abs(d)<=eps;
writeln('Koren ',n,' stepeni iz ',x:3:3, ' raven ',y:3:3);
writeln('Kolvo iteracii = ',k);
readln;
end.


я не уверен что это тот метод который нужен.

мде не то.

Сообщение отредактировано: klem4 -


--------------------
perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #5


Новичок
*

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

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


Цитата(volvo @ 11.05.05 9:38)
klem4, а ты задание смотрел?
Мало ли, КАК можно что сделать? Можно и базу данных самому не писать, а зачем Access придумали? Но есть один маленький фактор: ЗАДАНИЕ.

Так вот, по заданию нужно найти корень методом Ньютона. А твоим методом - ну, попробуй вычислить корень 5-ой степени из (-32)...

rolleyes.gif у тебя идей неть?!
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #6


Гость






Цитата(eprsteklmn @ 11.05.05 18:32)
rolleyes.gif у тебя идей неть?!

Есть небольшая: на алголисте я кое-что встречал по теме:
Точное вычисление обратного числа, корня m-й степени

Тебя более должно интересовать вычисление корня M-ой степени... Почитай, попробуй разобраться.
 К началу страницы 
+ Ответить 
сообщение
Сообщение #7


Новичок
*

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

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


Цитата(volvo @ 12.05.05 12:52)
Есть небольшая: на алголисте я кое-что встречал по теме:
Точное вычисление обратного числа, корня m-й степени

...мда.... я же говорил "сам не местный...":)
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

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

 





- Текстовая версия 16.05.2024 23:14
500Gb HDD, 6Gb RAM, 2 Cores, 7 EUR в месяц — такие хостинги правда бывают
Связь с администрацией: bu_gen в домене octagram.name