Составить программу, в Паскале

[Лика505]

Составить программу, определяющую, пройдет ли график функции y = ax2 + bx + c через точку с координатами (m.n) . Коэффициенты уравнения и координаты точки вводятся с клавиатуры. Помогите решить программку в Паскале, оч надо

[BDA]

uses CRT;

var
  a,b,c,m,n:real;

const
eps=0.000001;

begin
  writeln('Input A, B, C (y=Ax^2+Bx+C):');
  readln(a,b,c);
  writeln('Input M, N:');
  readln(m,n);
  if abs(a*m*m+b*m+c-n)<eps then
    writeln('YES')
  else
    writeln('NO');
  readln;
end.