Page 233 - 6197

% x1,x2-корені квадратного рівняння
%---------------------------------------------
a=4;
b=5;
c=7;
D=b^2-4*a*c;
if D>=0
x1=(-b+sqrt(D))/(2*a);
x2=(-b-sqrt(D))/(2*a);
disp('Корені дійсні')
disp('x1=')
disp(x1)
disp('x2=')
disp(x2)
else
re=-b/(2*a);
im=sqrt(-D);
disp('Корені комплексно-спряжені')
x1=re+i*im
x2=re-i*im
end
Рисунок 4.9 – Обчислення коренів квадратного рівняння

У програмі (рис.4.9) використана структура оператора
0
if-else. У випадку, коли D  вичислюються дійсні корені
0
(оператори if і else) і при D  обчислюються
комплексно-спряжені корені (оператори if і else). Результат
обчислень виводиться на екран дисплея за допомогою
оператора disp.
За допомогою оператора if-else-elseif можна
організувати розгалуження.
if умова 1
statement
.................
statement
elseif умова 2
statement
.................
statement
else
statement

233