rozwiązanie równania kwadratowego w programie Pascal.
Chodzi mi o napisane co dokładnie pokolei trzeba wpisac w Pascalu. W załączniku podpowiedź.

Potrzebne wzory:
d := sqr(b) - 4*a*c;
x1 := (-b - sqrt(d))/(2*a);


Rozwiązanie Równania Kwadratowego W Programie Pascal Chodzi Mi O Napisane Co Dokładnie Pokolei Trzeba Wpisac W Pascalu W Załączniku Podpowiedź Potrzebne Wzory D class=

Odpowiedź :

ax2+bx+c=0
Algorytm z załącznika jest błędny bo nie rozpatruje opcji kiedy a=0
i wówczas mamy równanie liniowe ax+b=0


Program rownanie kwadratowe;
var a,b,c,x1,x2:real;
begin
write('program znajduje piaerwiastki rownania kwadratowego o postaci ax2+bx+c=0')
if a=0 then
if b=0

(dokoncze za 30 min )