task_4_1

% Задача 4.1
% Написать скрипт, в котором:
%  - создается анонимная функция (нотация через символ @),
% задающая параболу вида ax2+bx+c, коэффициенты которой
% генерируются случайными числами;
%  - график полученной функции отобразить в графическом окне
% с таким диапазоном, чтобы вершина параболы была видна;

clear all
close all
clc


diap=100
a=randi(diap)*(-1)^randi(diap)
b=randi(diap)*(-1)^randi(diap)
c=randi(diap)*(-1)^randi(diap)
% ypr=2*a*x+b=0 производная
x0 = b/(2*a)

start = fix(x0) - 100
finish = fix(x0) + 100
x=(start:1:finish)';
% y = a*x.^2 + b.*x + c;
fan=@(x) ( a*x.^2 + b.*x + c  )

yyy=fan(x);
figure(1)
hold('on');
plot(x,yyy,'r*')
% plot(t*1e3,iL1,'k--.')

x00 = fzero(fan, -10)
fan(x00)