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

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

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

 
 Ответить  Открыть новую тему 
> Рекурсивная функция, найти квадратный корень с заданной точностью
сообщение
Сообщение #1





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

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


Найти квадратный корень с заданой точностью воспользовавшись итерационной формулой Ньютона
Y=1/2(Y+X/Y). Напишите хотя бы процедуру с рекурсией.
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #2


Гость






Что именно не получается? Знаешь, что такое рекурсия вообще? Где сложности?
 К началу страницы 
+ Ответить 
сообщение
Сообщение #3





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

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


я не могу никак написать процедуру с рекурсией


Добавлено через 3 мин.
прога постоянно зависает и приходиться перезагружать комп
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #4


mea culpa
*****

Группа: Пользователи
Сообщений: 1 372
Пол: Мужской
Реальное имя: Николай

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


А может, надо функцию с рекурсией?


--------------------
"Знаешь, стыдно - когда не видно, что услышал всё, что слушал.."
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #5





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

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


не важно процедура или функция
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #6


Гость






Ты покажи, как делаешь, посмотрим, чего там у тебя зависает... А то это все пустые слова. У меня вот не зависает, и что?
 К началу страницы 
+ Ответить 
сообщение
Сообщение #7





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

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


Unconnected, если тебе не трудно напиши свой вариант функции.

Добавлено через 1 мин.
Я сейчас не дома и проги под рукой нету.
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #8


Гость






Нет, извини... Задание твое, у тебя есть какой-то вариант, который якобы "зависает". Вот и приведи его. А то складывается ощущение, что тебе это не очень-то и надо, так, пришел, взял готовое, ИЗОБРАЖАЯ ДЕЯТЕЛЬНОСТЬ, и пошел сдавать.

P.S. Значит, когда будешь дома - покажешь.
 К началу страницы 
+ Ответить 
сообщение
Сообщение #9





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

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


Ok
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #10


Гость






uses crt;
var x,y,y0,e:longint;
function prod(x,y0,e:longint):longint;
y0:=1;
prod:=1/2*(y0+x/y0);
write('e=');
read(e);
while abs(prod-y0)>e d0
begin
y0:=prod;
prod:=1/2*(y0+x*y0);
end;
begin
write('vveditr chislo');
read(x);
prod(x);
writeln(prod:1:8);
readkey;
end.


М
Тэги! Lapp

 К началу страницы 
+ Ответить 

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

 





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