Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
 
0 / 0 / 0
Регистрация: 12.12.2013
Сообщений: 4
1

Найти рекуррентную форму для явно заданной функции

14.01.2014, 02:12. Показов 445. Ответов 2
Метки нет (Все метки)

Имеется такая задача: найти рекуррентную форму для явно заданной функции:
https://www.cyberforum.ru/cgi-bin/latex.cgi?F\left(n \right)=\sum_{i=0}^{n}  \frac{i^2-3}{i+12}

С pascal моя дружба не сложилась, поэтому, прошу помощи в поиске ошибки:

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
program project1;
 
uses crt;
 
var sum: real;
  i,n:integer;
    function func(n:integer):real;
  begin
    for i:=0 to n do
    func:=(i*i-3)/(i+12);
    sum:=sum+func(n);
  end;
 
begin
  writeln('Vvedite znachenie n');
  readln(n);
  writeln('Znachenie F(n) ravno ',sum);
   readkey;
end.
0

Помощь в написании контрольных, курсовых и дипломных работ здесь.

Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
14.01.2014, 02:12
Ответы с готовыми решениями:

Максимум функции(не явно заданной)
Помогите пожалуйста определить максимум функции и значение, при котором достигается максимум, так...

Построить график явно заданной функции (указать асимптоты и точки разрыва)
Построить график явно заданной функции; на графике указать асимптоты и точки разрыва: у = cos...

Используя каноническую форму интерполяционного многочлена для таблично заданной функции запишите систему
Задана таблица значений функции y=f(x): xi 1.2 2.7 3.1 4.9 5.5 yi 4.7501 6.2317...

Найти рекуррентную формулу, разработать программу вычисления функции путем разложения ее в ряд
Найти рекуррентную формулу, разработать программу вычисления функции ea путем разложения ее в ряд...

2
Супер-модератор
Эксперт Pascal/DelphiАвтор FAQ
30922 / 20233 / 7887
Регистрация: 22.10.2011
Сообщений: 35,120
Записей в блоге: 6
14.01.2014, 02:36 2
Цитата Сообщение от Lester_ Посмотреть сообщение
найти рекуррентную форму
, или "написать рекурсивную функцию"? Если все-таки про рекурсию - то:
Pascal
1
2
3
4
5
function f(n : integer) : real;
begin
  if n < 0 then f := 0
  else f := (sqr(n) - 3) / (n + 12) + f(n - 1);
end;
1
0 / 0 / 0
Регистрация: 12.12.2013
Сообщений: 4
14.01.2014, 02:43  [ТС] 3
Цитата Сообщение от UI Посмотреть сообщение
, или "написать рекурсивную функцию"?
Да, Вы правы, я ошибся.
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
14.01.2014, 02:43

Заказываю контрольные, курсовые, дипломные работы и диссертации здесь.

Найти рекуррентную формулу, разработать схему алгоритма и программу вычисления значения функции
Смотри вложение

Найти рекуррентную формулу и вычислить таблицу значений функции путем разложения её в ряд
найти рекуррентную формулу и написать прогу вычисления таблицы значений функции 2(cos2x - 1) путем...

Найти рекуррентную формулу для вычисления суммы ряда
Помогите найти рекуррентную формулу для вычисления суммы ряда, а то ничего не получается

Найти рекуррентную формулу для вычисления суммы ряда
помогите найти рекуррентную формулу. Задача. Найти сумму ряда с точностью e=10-4, общий член...

Для заданной функции f(x,y,z) найти производные
http://s001.radikal.su/2012/11/29/46122fe2.bmp z^2+x^3-3y+4z-2=0

Найти y x для функции, заданной параметрически
Может эти уравнения неправильно заданы как я понимаю синус гиперболический -ch – гиперболический...


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

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

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