код: var n: integer; a, x, y1, y2, e: real; begin - вопрос №2101831912 от cozycoat1 10.01.2022 21:03

Question

Информатика: код: var n: integer; a, x, y1, y2, e: real; begin write ( a, x, e = ); readln (a, x, e); y1:=a; y2:=0.5*(y1+x/y1); n:=2; while abs(sqr(y2)-sqr(y1)) e do begin inc(n); y1:=y2; y2:=0.5*(y1+x/y1); end; writeln ( Первый номер члена последовательности = , n); end.

cozycoat1 · Answer

a = float(input( a = )) x = float(input( x = )) e = float(input( e = )) y1 = a y2 = 0.5*(y1+x/y1) n = 2 while abs((y2**2)-(y1**2)) e:    n += 1    y1 = y2    y2 = 0.5*(y1+x/y1) print( Первый номер члена последовательности = , n)...