Вычислить значение полинома Паскаль

[kasik]

помогите кто может Вычислить значение полинома для N значений Х.doc

[Hacker19_90]

Writeln ('enter X: ');
ReadLn (x);
Writeln ('enter n: ');
ReadLn (n);
y := 0;
for i := 0 to n do
begin
    Writeln ('enter a',i,':');
    ReadLn (a);
    y := y + a*exp(ln(x)*i);
end;
Writeln ('y= ', y);