Как реализовать куб выражения?

[Mr.Qwerty]

Доброй ночи! Вообще попалось такое задние что: Вычислите значение фун-ии x=3,56(a+b)^3-5,8b^2+3,8a-1,5, собственно вопрос, как такую вещь реализовать попроще (a+b)^3, а то такое меня не устраивает:

program xxx;
var a,b,x:integer;
begin
ClrScr;
x:=3,56*((a+b)*(a+b)*(a+b))-5,8*sqr(b)+3,8*a-1,5;
Writeln(x);
Readln;
end.

Помогите плиз если не сложно!

[sheka]

тут есть уйма способов. самый легкий (т.к. здесь точность роль не важную играет) - x^n=exp(n*ln(x))
или
http://www.programmersforum.ru/showp...79&postcount=5
Решалось ведь в предыдущей теме!

[Mr.Qwerty]

sheka, спасибо!+)