Составить программу которая находит корни неполного квадратного уравнения

Question

Составить программу которая находит корни неполного квадратного уравнения

Comments

Пример квадратного уравнения в студию.. Оно может иметь разные виды.

Answer 1

Program koren;
var a,b,c,diskr,x1,x2:real;
begin
readln (a,b,c);
if a=0 then exit;
diskr:=b*b-4*a*c;
if diskr<0 then exit; <br>x1:=(-b-sqrt(diskr))/(2*a));
x1:=(-b+sqrt(diskr))/(2*a));
writeln (x1,x2);
end.