else
instrukcje3
end
% Rozwiązanie równania kwadratowego a = input('Podaj a: ');
if a == 0
disp('a = 0: to nie jest równanie kwadratowe')
else
delta = b.A2-4*a.*c; if delta > 0
xl = (-b-sqrt(delta)) / (2*a); x2 = (-b+sqrt(delta)) / (2*a); disp(strcat('xl = ',num2str(xl))) disp (strcat('x2 = ',num2str(x2))) elseif delta == 0 x = -b / (2*a);
disp(strcat('xl = x2 = ',num2str(x)))
else
disp('Brak pierwiastków rzeczywistych')
end
end