Составьте программу, определяющую, пройдет ли график функции y=5x²-7x+2 через заданную точку с координатами (a,b)- Pascal(Паскаль)

VAR
  a,b:integer;
BEGIN
  write('Введите  координату a: ');
  readln(a);
  write('Введите  координату b: ');
  readln(b);
  if (5*sqr(a)+7*sqr(a)+2)=b  then
  writeln('График функции проходит через данную точку!')
  else writeln('График функции не проходит через данную точку!');
END.