Я пытаюсь найти непрерывные дробные дроби, используя функцию nest в mathematica, однако, когда я реализую это, мои первая и вторая переменные индексируются правильно, а остальные совпадают со второй. Код, с которым я работаю:
Я уже пытался использовать только саму функцию, однако у меня мало опыта с Mathematica
For[j = 1, j < 5, j++,
Print[Subscript[a, 0] +
Nest[(1/(# + Subscript[a, j + 1])) &, Subscript[a, j], j]]]