Kolmion keskipisteen laskenta.
clear all % Tyhjennetään kaikki vanhat tiedot. close all % Suljetaan kaikki ikkunat, jotka ennestään on auki. % Pisteiden A,B ja C koordinaatit A=[0,0] B=[5,2] C=[4,4] % Lasketaan keskipisteen x koordinaatti keski(1) = (A(1)+B(1)+C(1))/3 % Lasketaan keskipisteen y koordinaatti keski(2)= (A(2)+B(2)+C(2))/3 %Tulostetaan viiva pisteiden A, B välille. plot([A(1),B(1)],[A(2),B(2)], "r",'linewidth',1) % hold on päälle, niin edellistä kuvaa ei pyyhitä pois, kun uusi piirretään. hold on %Tulostetaan viiva pisteiden C, B välille. plot([C(1),B(1)],[C(2),B(2)], "r",'linewidth',1) %Tulostetaan viiva pisteiden A, C välille. plot([A(1),C(1)],[A(2),C(2)], "r",'linewidth',1) %tulostetaan pallura kolmion keskipisteen kohdalle. plot ([keski(1)], [keski(2)], "ro") % hold pistetään pois päältä hold off Tulostaa alla näkyvän kuvan ja laskee kolmion keskipisteen.