ZAD 1.

function [y]=odleglosc(A,B)

y=sqrt((B(1)-A(1))^2+(B(2)-A(2))^2);

end

A=[100.21, 250.1];

B=[150.12, 215.12];

y=odleglosc(A,B)

WYNIK: 60.9476

ZAD 2.

1. A=randi([1,100],15,15)

b) n=input('podaj liczbe= ');

podzielna=1;

for i=3

if (mod(n,i)==0)

podzielna=0;

display('liczba jest podzielna przez 3');

break;

else

podzielna=1;

end

end

if (podzielna==1)

display('liczba nie jest podzielna przez 3');

end

for j=5

if (mod(n,j)==0)

podzielna=0;

display('liczba jest podzielna przez 5');

break;

else

podzielna=1;

end

end

if (podzielna==1)

display('liczba nie jest podzielna przez 5');

end

c) n=30;

suma=0;

for i=1:n

if (mod(i,3)==0) && (mod(i,5)==0)

suma=suma+1;

end

end

suma

ZAD 3.

function [azymut]=az(A,B)

deltaX=B(1)-A(1);

deltaY=B(2)-A(2);

kat=atan(deltaY/deltaX);

czwartak=(10/9)*kat;

if deltaX>0 && deltaY>0,

azymut=czwartak;

elseif deltaX>0 && deltaY<0,

azymut=200-czwartak;

elseif deltaX<0 && deltaY<0,

azymut=200+czwartak;

else

azymut=400-czwartak;

end

end

A=[100.21, 250.10];

B=[150.12, 215.12];

dAP=45.3;

dBP=62.15;

dAB=sqrt((B(1)-A(1))^2+(B(2)-A(2))^2);

Aab=az(A,B)

fi=acos((dAP^2)-(dAB^2)-(dBP^2))/(-2*dBP*dAB)

beta=acos(dBP^2-(dAB^2+dAP^2))/(-2*dAB*dAP)

alfa=acos(dAP^2-(dBP^2+dAB^2))/(-2*dBP*dAB)

…..