Составьте программу вычисления функции y=5x^3+0.5-3x^2 для x=0.5,10...40,45,50

var x: real;

begin

 readln(x);

 write(5*power(x,3)+0.5-3*power(x,2));

end.

P.s power(x,y) - это функция, которая возводит число x в степень y.