Y=bx^2 + 3x -1 по языку паскаль

program kvadratnoe_uravnenie;

var y, b, x: integer;

begin

writeln(\'Введите y\');

readln(y);

writeln(\'Введите b\');

readln(b);

writeln(\'Введите x\');

readln(x);

y = (b*x*x) + (3*x) - 1;

writeln(\'Решением квадратного уравнения bx^2 + 3x -1 является \', y);

end.