y=ax^3/2 Вычислить значение заданной функции в паскале

var y:real; ax:real;  begin  write('Введите ax: ');  readln(ax);  y:=ax*ax*ax/2;  writeln('Y = ', y);end.