lesson2

clear
clc
a = [3, 2; 1, 2];
b =  [12; 8];
x = a \ b;
% решение уравнения матричного
clear
clc
a = [4, 2,1; 1, 4,4; 1,0,2];
b =  [17; -3; 1];
x = a \ b;
% решение уравнения матричного
clear
clc
a = rand (200);
b = rand (200,1);
x = a\b;
% a*x = b   b - b = погрешность;
disp(a*x - b);
% решение уравнения матричного
clear
clc
a = 1 == 2;
b = 1 == 1;
% if else
clear
clc
x = 1;
y = 2;
num=0;
if(x>0)&&(y>0)
    num=1;
elseif (x<0)&&(y>0)
    num=2;
elseif (x<0)&&(y<0)
    num=3;
elseif (x>0)&&(y<0)
    num=4;
else
    disp('Точка лежит на оси!');
    return;
end
disp(['Ваша точка лежит в ', num2str(num),' четверти']);

% if else вложенные условия
clear
clc
x = -1;
y = 2;
num='';
if(x>0)
    if(y>0)
        num=1;
    else
        num=4;
    end
elseif(x<0)
    if(y>0)
        num=2;
    else
        num=3;
    end
else
    disp('Точка лежит на оси!');
return;
end
disp(['Ваша точка лежит в ', num2str(num),' четверти']);

% while for вложенные условия
clear
clc
for n = 1:2:10

end

% while for вложенные условия
clear
clc
M=0;
for N = 1:1e7
    x=rand();
    y=rand();
    d = sqrt(x^2+y^2);
    if (d <=1)
        M=M+1;
    end
end
pi2_ = (M/N)*4;
% while for ряд Фибоначчи
clear
clc
N = 20;
fib=[1,1];
for k = 3:N
    fib(k)= fib(k-1)+fib(k-2);
    disp([num2str(k),'=',num2str(fib(k)),' ']);
end
%disp(fib(k));


% MOD for числа от 1 до 5000 где num/39 - остаток ноль
clear
clc
N = 5000;
count = 0;
for k = N:-1:1
    trigger = mod(k,39);
    if (trigger==0)
        disp([num2str(k),' делится на 39']);
        count = count +1;
    end
end
disp(['Всего ',num2str(count)]);

% MOD for числа от 1 до 10000 Найти МАХ num/13 и 17 - остаток ноль
clear
clc
N = 10000;
MAX = 0;
for k = 1:N
    trigger1 = mod(k,13);
    trigger2 = mod(k,17);
    if (trigger1==0)&&(trigger2==0)
        %disp([num2str(k),' делится на 13  и 17']);
        if(MAX<k)
            MAX = k;
        end
    end
end
disp(['MAX = ',num2str(MAX)]);