//nerecursiv
float pol(int n, float A[], float y)
{
    float p=0;
    for(int i=0;i<=n;i++)
        p=p+A[i]*pow(y,n-i);
    return p;
}
//recursiv
float polrec(int n, float A[], float y)
{
    int i=0;
    while(A[i]==0 && i<=n) i++;
    if(i>n) return 0;
    else
    {
        float mon=A[i]*pow(y,n-i);
        A[i]=0;
        return mon+polrec(n,A,y);
    }
}