Рекурсия

[Anton5475]

не понимаю рекурсию, нужна помощь

[Хыиуду]

Блин, а вот потом из-за таких заданий и растут люди быдлокодерами... Вот нахрена впихивать рекурсию там, где она просто в ноль не нужна?

Код: Выделить всё

function f(n: integer):real;
begin
  if n=1 then result := 12.4*sin(1/2.1) - 8.3*cos(1.2); 
  else result := (12.4*sin(n/2.1) - 8.3*cos(1.2*n)) * f(n-1); 
end;

Модуль в синусе нафиг не нужен, потому что частное двух положительных чисел априори положительно.

[Anton5475]

да, задач у нас много бредовых, с этим я согласен.
и огромное спасибо за решение)