poly_flaeche

function A = poly_flaeche(P,anzKnoten)
    [r,c] = size(P);
    n = r - 1;
    A = 0;
    for i = 1:n
    % Erste Klammer A (x-Teil)
    AK1 = ( P(i,1) - P(i+1,1) );
    % Zweite Klammer A (y-Teil)
    AK2 = ( P(i,2) +  P(i+1,2) );
    % Formel Flächeninhalt
    A = A + (0.5 * AK1 * AK2);
    end
    formatSpecA = 'Der Flächeninhalt des Polygons beträgt %f\n';
    fprintf(formatSpecA,A);
end