
%% Triller Nsample terningar og tar gjennomsnittet
Nsample=10;
sample=randi(6,[Nsample,1]);
mean(sample)

%% Paa ei linje
mean(randi(6,[Nsample,1]))

%% Pengespel med terning
Nspel=1
terningkast=0;
gevinst=0;
terningkast=randi(6,[1,Nspel]) %trillar terning Nspel gongar
f=find(terningkast<6); 
gevinst(f)=-terningkast(f); %m? betale
f=find(terningkast==6);
gevinst(f)=10; %f?r pengar
mean(gevinst)

%%

