task_1_1ver5

% %https://base-n.de/matlab/code_beautifier.html
% 1.1
% Написать скрипт, в первом блоке которого генерируются
% случайные координаты
% двух точек в декартовых осях
% (в диапазоне от -10 до 10 по каждой координате)
clear
clc
close all % закрыть окна
Pts2per2 = rand(2, 2) - rand(2, 2);
Pts2per2 = Pts2per2 * 10;  % матрица готова

%Pts2per2 = [0, 1; 1, 1] * 10;  % для проверки вертикального графика и горизонтального


% построить в графическом окне обе точки и прямую, проходящую через них;
grid on % включает сетку
hold on % включает наложение графиков

% для проверки составления прямой А и В
plot(Pts2per2(1, 1), Pts2per2(1, 2), '*k'); % первая точка А
plot(Pts2per2(2, 1), Pts2per2(2, 2), '*y'); % вторая точка В

% вывести в командное окно уравнение этой прямой (в виде y = 4*x - 0.75);

ugolGraf4 = (Pts2per2(1, 2) - Pts2per2(2, 2)) / (Pts2per2(1, 1) - Pts2per2(2, 1)); % % https://ru.wikipedia.org/wiki/%D0%A3%D0%B3%D0%BB%D0%BE%D0%B2%D0%BE%D0%B9_%D0%BA%D0%BE%D1%8D%D1%84%D1%84%D0%B8%D1%86%D0%B8%D0%B5%D0%BD%D1%82
num075 = Pts2per2(1, 2) - (Pts2per2(1, 1) * ugolGraf4);
PointsX = - 10:(1):10;
PointsY = ugolGraf4*PointsX + num075; % Готовы точки графика по Х и У

% if (Pts2per2(1, :) == Pts2per2(2, :)) % точка первая равна точке второй A==B
%     PointsX = - 10:(1):10;
%     num075 = Pts2per2(1, 1);
%     PointsX = (PointsX - PointsX) + num075;
%     PointsY = PointsX;
%     plot(PointsX, PointsY, '.b-');
%     disp(['Функция F(x) = ', num2str(num075), '; x = ', num2str(num075)]);
%     return;
% end
% if (Pts2per2(1, 1) == Pts2per2(2, 1)) % X1 == X2 иксы равны
%     num075 = Pts2per2(1, 1);
%     PointsX = (PointsX - PointsX) + num075;
%     PointsY = - 10:(1):10;
%     plot(PointsX, PointsY, '.b-');
%     disp(['Функция F(x) = (-inf,+inf)', '; x = ', num2str(Pts2per2(1, 1))]);
%     return;
% end
% if (Pts2per2(1, 2) == Pts2per2(2, 2)) % Y1 == Y2 игрики равны
%     num075 = Pts2per2(1, 2);
%     PointsX = - 10:(1):10;
%     PointsY = (PointsY - PointsY) + num075;
%     plot(PointsX, PointsY, '.b-');
%     disp(['Функция F(x) = ', num2str(Pts2per2(1, 1)), '; x = (-inf,+inf)']);
%     return;
% end

plot(PointsX, PointsY, '.b-');
if (num075 < 0)
    disp(['Функция F(x) = ', num2str(ugolGraf4), '*x - ', num2str(abs(num075))]);
else
    disp(['Функция F(x) = ', num2str(ugolGraf4), '*x +', num2str(abs(num075))]);
end