function gerade(alpha,beta,sigma)
c=1000;
X=linspace(0,10,c);
if alpha==1
    X=1/(beta+sigma);
    Y=-10:0.001:10;
    figure(5)
    plot(X,Y,'r')
else
 for i=1:c
     Y(i)=(beta*sigma*X(i))^(1/(1-alpha));
 end    
    figure(6)
     plot(X,Y,'g')
     axis([0 10 0 10])
 
end