Написать примером y=x^2-5x/3 в паскале абс. информатика 9 класс.

//прога на Pascal`e
var
x: real;

function f (p:real):real;
begin
f:=sqr(p)-5*p/3;
end;

begin
write ('Введи x: ');
readln (x);
write (f(x));
end.