Questo sito contribuisce alla audience di

Equazione di II grado

Un m-file che forniti i coefficienti delle incognite di un'equazione di II grado ne determina la soluzione

%Soluzione di un’equazione di secondo grado nella forma:
% ax^2 + bx + c

a = input(’digita il coefficiente a’);
b = input(’digita il coefficiente b’);
c = input(’digita il coefficiente c’);

discriminante = b^2 - 4 * a * c;

if (discriminante >=0)
if (discriminante == 0)
x1 = -b / (2*a);
disp(’soluzione reale equazione ‘);
disp(x1);
else
x1 = (- b - sqrt(discriminante))/(2*a);
x2 = (- b - sqrt(discriminante))/(2*a);
disp(’soluzione reale equazione ‘);
disp(x1);
disp(’soluzione reale equazione ‘);
disp(x2);

end
else
disp(’errore - soluzioni complesse’);
end