Нарисать алгоритм нахождения значения функции на Pascal:
y=(x2 + 3x -4 )/(x - 7)

Program V; Var y, x: real; Begin writeln(‘значение функции y’); x:=-4; while x<=2 do begin y:=4*x^2-2*x+3 ; x:=x+0,5; writeln(y:16:4); end; End.