Question

Создайте рекурсивную функцию для вычисления неизвестного следующей последовательности. Напишите программу ее проверки. Проверять корректность исходных данных в работе не требуется. Замечание: рекурсивное решение в данном случае не оптимально; задание предназначено только для того, чтобы попробовать сделать простейшую рекурсивную функцию. Ниже на скрине красным веделено...
PASCAL(Lazarus)
помогите пожалуйста!! Не понимаю, как сделать....
Желательно с кодом.. Спасибо

Answer 1

//PascalABC.Net 3.0, сборка 1053
function F(n:integer):longint;
begin
  case n of
    1: F:=4;
    2: F:=-4;
    else F:=6*F(n-1)-4*F(n-2)
  end
end;

begin
  Writeln('F(5)=',F(5)) { тестовое}
end.

Тестовое решение:
F(5)=-1184

Answer 2

Извиняюсь еще раз, но вы не могли бы расписать подробно, как она работает?

Answer 3

Я не знаю, как можно ПОДРОБНО расписать три оператора присваивания, два из которых вообще просто присваивание констант, а третий по сути копия приведенной в задании формулы.

Answer 4

Я не понимаю, как работает выражение. Можете подставить значения и посчитать, пожалуйста. Я подставляю вместо n число - и выходит другое.

Answer 5

Значит, Вы неправильно считаете. Учить арифметике - это не задача предмета "Информатика"

Answer 6

Работа функции для аргумента 5 мной была проверена.