b= 12;
l=20;
d=1.5;

% filename=('Kraftwegverlauf-2');
% daten=xlsread(filename);
daten=[1 6;2 5;3 4;4 3;5 2;6 1];


for k=1:length(daten)
    [ergebnis1]=spanDehn(daten(k,:),b,d);
    E(k)=ergebnis1(1);
    Q(k)=ergebnis1(2); 
    [ergebnis2]=fliUmf(E(k),Q(k));
    S(k)=ergebnis2(1);
    Kf(k)= ergebnis(2);
end

plot(daten(:,1),daten(:,2));
%hier deine Achsenbeschrieftung einfügen
hold on;
plot(E(1,:),Q(1,:));
%hier deine Achsenbeschrieftung einfügen
hold on;
plot(S(1,:),Kf(1,:));
%hier deine Achsenbeschrieftung einfügen