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

Question

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

Comments

tak nuzhen algoritm ili programma?

---

программа

---

sejchas vlom, mozhet vecherom

---

может всё-таки ax^2 + c = 0, или именно y

---

корни нужны в ответе

---

окей, минут 5

Answer 1

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

Comments

извините, а где вычисление дискриминанта?

---

Это же неполное, можно просто найти x^2, а потом извлечь корень, ну и 2 результата получится: положительный и отрицательный

---

нет

---

а как же коэффициент А и С?

---

Но нет B

---

-c делим на a, находим x^2

---

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

---

Линейное