Помогите по информатике!!!! Пожалуйста! Никак не могу сделать!!!! Задание во вложении....

Question

Помогите по информатике!!!! Пожалуйста! Никак не могу сделать!!!! Задание во вложении. Это не контрольная!!!!

---

Answer 1

Var
    k, n, i: integer;
    s: real;

begin
    read(k, n);
   
    for i := n downto 1 do
        s := sqrt(i * k + s);
   
    writeln(s);
end.

Answer 2

Необходимо создать рекурсивную функцию.
Что-то типа:

double foo(int k, int N, double value = 0) {
    if (N>0)  return foo(k, N - 1, sqrt(k*N + value));
    return value;
}

Comments

рекурсию лучше разворачивать в цикл