написать программу, определяющую, может ли точка с данными координатами принадлежать графику функции y=5x²+1. с клавиатуры вводится 2 числа написать в паскаль

Var x,y:real;
Begin
Write('x = ');ReadLn(x);
Write('y = ');ReadLn(y);
if 5*x*x+1=y then WriteLn('Да, может')
else WriteLn('Нет не может');
End.