Написать программу в TurboPascal.

Question

Вычислить кубический корень из числа Х с заданной точностью. Х считать за произвольное число. При этом, пользоваться функциями вычисления кубического корня запрещено.

Антон · Accepted Answer

Переделай на Pascal void main() { double x, y, y0; const e = 0.0001; cin>>x; if (x<1) { y = x; } else { y = x/3.0; } do { y0=y; y = y0-1/3.0*(y0 - x/((y0*y0)*1.0)); }while(fabs(y-y0)>e); cout << y; }