| informa |
| 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); |