математическое уравнение (х2-7х):12 можно записать на язык паскаля:
заранее спасибо

varx: real;function f (p:real):real;beginf:=(sqr (p) - 7*p)/12end;beginwrite ('Введите x: ');readln (x);write ( f(x) );end.