написать программку вычисления среднего геометрического N первых естественных чисел

Паскаль?

c++

includelt;cmathgt;
includelt;iostreamgt;
using namespace std;


int main()

    int N;
    double P = 1;
    cout lt;lt; "N = ", cin gt;gt; N;
    for(int A = 1; Alt;=N; A++)
         P=P*A;
    P = (Ngt;0?pow(P,(double)1/N):0);
    cout lt;lt; "P = "lt;lt;Plt;lt;"\n";
    system("Pause");
    return 0;