%Monty Hall: Det er tre dører, to med geit/statistikkoving, ei med bil/sjokolade.
%Deltakaren vel ei av dei tre dørene. Verten (Monty) opnar ei av dei andre,
%der det alltid er geit/statistikkoving. Deltakaren kan velje aa bytte dor 
%etterpå.

n=1000; %Antall spel
VinnStrategiBytte=0;
VinnStrategiIkkjeBytte=0;

for i=1:n 
    MontyKanVelge=[1,1,1];
    DeltakarKanBytte=[1,1,1];
   vinnarDor=randi(3);
   MontyKanVelge(vinnarDor)=0;
   velgerForst=randi(3);
   MontyKanVelge(velgerForst)=0;
   f=find(MontyKanVelge);
   MontyVelger=f(randi(length(f)));
   %Strategi bytter
   DeltakarKanBytte(velgerForst)=0;
   DeltakarKanBytte(MontyVelger)=0;
   velgerDor=find(DeltakarKanBytte==1);
   if(velgerDor==vinnarDor)
       VinnStrategiBytte=VinnStrategiBytte+1;
   end
   %Strategi ikkje bytter
   if(velgerForst==vinnarDor)
      VinnStrategiIkkjeBytte=VinnStrategiIkkjeBytte+1;
   end
end

VinnStrategiBytte

VinnStrategiIkkjeBytte

