Найти первый член последовательности, удовлетворяющий заданному условию

@Tarick · Регистрация: 29.01.2013

Author24 — интернет-сервис помощи студентам

Помогите решить пожалуйста (...буду очень благодарен

Даны действительные числа a, b, ε (a > b > 0, ε > 0). Последовательности x₁, x₂, ..., y₁, y₂, ...

образованы по закону:

$https://www.cyberforum.ru/cgi-bin/latex.cgi?x_1=a,\ \ y_1=b,\ \ x_k=\frac{1}{2}\left(x_{k-1}+y_{k-1} \right),\ \ y_k=\sqrt{x_{k-1}y_{k-1}}$

Найти первое x_n такое, что |x_n-y_n| < ε.

@CodeR · 05.11.2014, 11:49

Pascal

Var a,b,eps,x1,y1,xn,yn:real;
Begin
    write('a,b,eps: ');readln(a,b,eps);
    x1:=a;y1:=b;
    Repeat
      xn:=1/2*(x1-y1);
      yn:=sqrt(x1*y1);
      x1:=xn;
      y1:=yn;
    Until abs(xn-yn)<eps;
    writeln('Xn = ',xn:0:4);
    readln;
End.

@Tarick 1 / 1 / 0 Регистрация: 29.01.2013 Сообщений: 90
		1
	Найти первый член последовательности, удовлетворяющий заданному условию 04.11.2014, 19:04. Показов 1490. Ответов 1 Метки нет (Все метки) Помогите решить пожалуйста (...буду очень благодарен Даны действительные числа a, b, ε (a > b > 0, ε > 0). Последовательности x₁, x₂, ..., y₁, y₂, ... образованы по закону: $https://www.cyberforum.ru/cgi-bin/latex.cgi?x_1=a,\ \ y_1=b,\ \ x_k=\frac{1}{2}\left(x_{k-1}+y_{k-1} \right),\ \ y_k=\sqrt{x_{k-1}y_{k-1}}$ Найти первое x_n такое, что \|x_n-y_n\| < ε. 0

	05.11.2014, 11:49

Найти первый член последовательности, удовлетворяющий заданному условию

Решение