program QuadraticInequality; var a, b, c, x: Integer;
begin writeln('Enter the values of a, b, and c for the quadratic inequality ax^2 + bx + c < 0'); write('a: '); readln(a); write('b: '); readln(b); write('c: '); readln(c);
writeln('The quadratic inequality is ', a, 'x^2 + ', b, 'x + ', c, ' < 0'); end.
program QuadraticInequality;
var
a, b, c, x: Integer;
begin
writeln('Enter the values of a, b, and c for the quadratic inequality ax^2 + bx + c < 0');
write('a: ');
readln(a);
write('b: ');
readln(b);
write('c: ');
readln(c);
writeln('The quadratic inequality is ', a, 'x^2 + ', b, 'x + ', c, ' < 0');
end.