Объясните, , в чем ошибка 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, что то значит?
Чтобы избавиться от ошибки, нужно знать алгоритм, который реализует программа. В зависимости от алгоритма может быть использована операция целочисленного деления, может быть использована функция Trunc(), возвращающая целочисленное значение аргумента, либо переменная y должна объявляться вещественной.