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

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

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.