Объясните, , в чем ошибка program funk; uses crt; var x,y: integer; begin for x: =-8 to 8 do y: =x*x+4/x+3; writeln (y); writeln (x); if x=0 then writeln ('функция не определена'); readkey end. пишет, что нельзя преобразовать тип real к integer, что то значит?