Задание:
Помогите решить, цикл с параметром, S: =√2+√2+… +√2, n-корней
Решение:
Var a: real; i, k: integer; begin readln (k); for i: =1 to k do a: =sqrt (2+a); writeln (a); end. Вот так, насколько я понимаю: вычисляем с конца корень из 2, потом к нему прибавляем 2 и опять вычисляем корень… И опять х) В общем, должно получится
Знаете другой ответ?