Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal ABC
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.80/5: Рейтинг темы: голосов - 5, средняя оценка - 4.80
exerenss
0 / 0 / 1
Регистрация: 11.12.2013
Сообщений: 34
1

Вычисление значения цепной дроби (рекурсивно и итеративно)

26.12.2013, 22:54. Просмотров 988. Ответов 1
Метки нет (Все метки)

Описать рекурсивную и нерекурсивную функции вычисления значения цепной дроби:

http://www.cyberforum.ru/cgi-bin/latex.cgi?\huge \frac{1}{n+\frac{1}{n-1+\frac{1}{n-2+...+\frac{1}{2+\frac{1}{1}}}}}
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
26.12.2013, 22:54
Ответы с готовыми решениями:

Вычислить значение цепной дроби
Вычислить значение дробей: (малейшего понятия не имею, как это сделать) ...

Нахождение значений цепной дроби
Найти значение цепной дроби на паскале

Рекурсия: вычисление цепной дроби
Помогите плиз написать программу, используя рекурсию: \huge...

Вычислить сумму ряда рекурсивно и итеративно
1.напишите рекурсивную функцию которая подсчитает сумму:...

Даны две рациональные дроби: a/b и c/d. Сложите их и результат представьте в виде несократимой дроби m/n.
Даны две рациональные дроби: a/b и c/d. Сложите их и результат представьте в...

1
volvo
Супер-модератор
Эксперт Pascal/DelphiАвтор FAQ
26146 / 17524 / 6949
Регистрация: 22.10.2011
Сообщений: 30,859
Записей в блоге: 6
26.12.2013, 23:35 2
Лучший ответ Сообщение было отмечено volvo как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
{ Рекурсивно }
function fr(n : integer) : real;
begin
  if n = 0 then fr := 0
  else
    fr := 1 / (n + fr(n - 1))
end;
 
{ итеративно }
function fi(n : integer) : real;
var
  s : real;
  i : integer;
begin
  s := 0;
  for i := 1 to n do
    s := 1 / (i + s);
  fi := s;
end;
 
var
  n : integer;
begin
  write('n = '); readln(n);
  writeln(fr(n):10:5);
 
  writeln(fi(n):10:5);
end.
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
26.12.2013, 23:35

Определить длину периода десятичной дроби M/N и период данной десятичной дроби M/N
Даны два натуральных числа M и N, M < N. Определить длину периода десятичной...

Цепной код.
http://www.tinaja.com/text/chain01.html -- вот какая-то информация о цепном...

Вычисление значения y=4x-1
Помогите создать программу на языке Паскаль, которая решит уровнение y=4x-1


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru