Question

среда turbo pascal. нужен алгоритм решения неполного квадратного уравнения y=ax^2+c

Answer 1

var
  a, c: real;
begin
  readln(a, c);
  a := sqrt(-c / a); //находим $x_1$ 
  writeln('x1 = ', a);
  writeln('x2 = ', -a);
end.

Answer 2

В общем, тут можно как обычное уравнение решать