Как вывести квадратное уравнение с вводимыми a,b,c в паскале?

var a, b, c: integer;

begin

writeln('введите a, b, c');

readln(a, b, c);

writeln (a,'x^2','+',b,'x','+',c);

end.

как с отрицательными не знаю, если честно