Forum Eks Grupy…

clc
clear all
disp ('wykreslanie wielokatow'
zakres=input('Podaj zakres osi [xmin xmax ymin ymax]=';
Lb=input('Liczba bokow=';
disp ('wierzcholki zaznacz myszka';
close (gcf)
axis (zakres);
hold on
grid
pkt= ginput(Lb);
xp= pkt(:,1);
yp= pkt (:,2);
fill (xp,yp,[1 1 0]);
Pole=polyarea(xp,yp);