Что значит ошибка "Нельзя преобразовать тип real к integer" в Паскале?

var a,b,c,x, D: integer;
begin
write('Введите a: ');
readln(a);
write('Введите b: ');
readln(b);
write('Введите c: ');
readln(c);

//Дискриминант
D:= sqr(b)-4*a*c;
if(D < 0) Then
begin
writeln('Не имеет смысла');
end;
if(D = 0) Then
begin
x:= (-b + sqrt(D))/(2*a);
writeln(x);

end;
if(D > 0) Then
begin
x:= (-b + sqrt(D))/(2*a);
writeln(x);
x:= (-b - sqrt(D))/(2*a);
writeln(x);

end;

end.