Question

Помогите перевести с паскаля на с++ const eps = 1e-4; function pow(x : Real; k : Integer) : Real; var r : Real; begin r := 1; while k > 1 do begin Dec(k); r := r * x; end; pow := r; end; function pRoot(x : Real; k : Integer) : Real; var y, y0 : Real; begin y := 1; repeat y0 := y; y := y + (x / pow(y, k-1) - y) / k; until abs(y - y0) < eps; pRoot := y; end; var a : Real; begin ReadLn(a); WriteLn((pRoot(a,3) - pRoot(a*a+1,6))/(1 + pRoot(3+a,7)) :0:5); end.

Answer 1

#include <iostream>

#include <iomanip>

using namespace std;

double pow (double x, int k)

{

   double r = 1;

   while(k > 1)

   {

       k--;

       r *= x;

   }

   return r;

}

double pRoot (double x, int k)

{

   double const eps = 1e-4;

   double y = 1, y0;

   do

   {

       y0 = y;

       y += (x / pow(y, k - 1) - y) / k;

   }

   while(abs(y - y0) >= eps);

   return y;

}

int main()

{

   double a;

   cin >> a;

   cout << fixed << setprecision(5) << (pRoot(a, 3) - pRoot(a * a + 1, 6)) / (1 + pRoot(3 + a, 7));

   return 0;

}

Answer 2

Вот переведенный код на C++:

cppCopy code
#include <iostream>
#include <cmath>

const double eps = 1e-4;

double pow(double x, int k) {
    double r = 1;
    while (k > 1) {
        --k;
        r *= x;
    }
    return r;
}

double pRoot(double x, int k) {
    double y = 1;
    double y0;
    do {
        y0 = y;
        y = y + (x / pow(y, k - 1) - y) / k;
    } while (std::abs(y - y0) < eps);
    return y;
}

int main() {
    double a;
    std::cin >> a;
    std::cout << std::fixed;
    std::cout.precision(5);
    std::cout << (pRoot(a, 3) - pRoot(a * a + 1, 6)) / (1 + pRoot(3 + a, 7)) << std::endl;
    return 0;
}

Надеюсь, это поможет! Если у вас возникнут еще вопросы, пожалуйста, сообщите.