clear;
clc;
count=1;
for n=5:5:100
      for powtorzenie=1:1:30

G=graf_pelny(n);
tio;

Wierz=sortrows(G,1);
wag=0;
wez(1:n)=[1:n];
licznik1=0;
licznik2=0;

while licznik2<n-1
  licznik1=licznik1+1;
  x=Wierz(licznik1,3);
  y=Wierz(licznik1,2);
  k=wez(x);
  l=wez(y);

  if k~=l;
    licznik2=licznik2+1;
    end1(licznik2)=x;
    end2(licznik2)=y;
    wag=wag+Wierz(licznik1,1);

    if k<l
      wez(y)=k;
      b=find(wez==l);
      wez(1,b)=k;
     else
      wez(x)=l;
      b=find(wez==k);
      wez(1,b)=l;
    end
  end
end
czas30powt[powtorzenie]=toc;
end;
czas_powtorzen(count)=sum(czas30powt)/30;

count=count+1;
end;


A=czas_powtorzen(1);
poprawka=A/25;

n=[5:5:100];
x=[5:5:100];
plot(n, czas_powtorzen)
hold on
plot(x,x.^2.'poprawka,'k')

fprintf('Pary wierzcholkow MST:')
  for i=1:n-1
    fprintf('{%g.%g}',end1(i),end2(i))
  end