Задача с вложенными корнями

[MrSTEP]

Задача с вложенными корнями

Здравствуйте. Была нам задана задача, написать на паскале задачу для вычисления следующего выражения:


Возникли некоторые разногласия среди студентов, как решать. Вроде и решили своими способами, а проверить никак - ответ никто не знает. Даже препод. Вот мой вариант программы, вроде похож на правду:

uses crt;
var y:real; x:integer;
begin clrscr;
      x:=99;
      y:=0;
      while (x>=3) do begin
            y:=sqrt(y+sqrt(x));
            x:=x-3;
      end;
      writeln (y:4:2);
      readkey;
end.

Но хотелось бы узнать мнение более опытных людей со стороны, насколько правильно решена задача. Заранее благодарю

 

[kreol]

хм что-то не то.
если начать проверять пошагово то после 2 итерации будет 3,59...
т.е. по идее из формулы корень(96 + корень(99)) = 3,59
на самом же деле при подсчете на калькуляторе 10,29... у тебя же при первом уже проходе вычисляется корень(корень 99) хотя должен просто корень(99)

 

[kreol]

вот верная прога. проверял на калькуляторе и дебаге ))

uses crt;
var y:real; x:integer;
begin clrscr;
      x:=99;
      y:=0;
      while (x>=3) do begin
            y:=sqrt(x+y);
            x:=x-3;
      end;
      writeln (y:4:2);
      readkey;
end.

 

[MrSTEP]

Да, я уже подумал о том, что внутренний корень надо убрать спасибо, все верно