kasegu - 経済統計練習帳

var q=new Array();
var base=new Array();
var v=new Array();
 
function myFunction() {
 
q[1]=100;
q[2]=100;
q[3]=100;
q[4]=100;
q[5]=100;
q[6]=100;
q[7]=100;
 
 for(tr=1;tr<136;tr++){
 
  point=0;
 
  for(inn=1;inn<10;inn++){
  out=0;
 
    for(s=1;s<4;s++){
  base[s]=0;
  }
 
  while(out<3){
 
play(); 
 
card();  
 
  }
 
}
v[tr]=point; 
}  
 
 
id="1n5DwVWJpDxDKVhN7jIYRLBz6lARluCFThuLWLzHr9m8";
 
ex = SpreadsheetApp.openById(id);
sh = ex.getSheetByName("data");
 
for(s=1;s<136;s++){
sh.getRange(s,1).setValue(v[s]);
}
 
 
 
}
 
 
function card_4(){
 
if(base[3]>50)point=point+1;  
if(base[3]>50)base[3]=0;  
if(base[2]>50)point=point+1;  
if(base[2]>50)base[2]=0; 
 if(base[1]>50)point=point+1;  
if(base[1]>50)base[1]=0; 
point=point+1;  
 
 
 
}
 
function card_3(){
 
if(base[3]>50)point=point+1;  
if(base[3]>50)base[3]=0;  
if(base[2]>50)point=point+1;  
if(base[2]>50)base[2]=0; 
 if(base[1]>50)point=point+1;  
if(base[1]>50)base[1]=0; 
 
base[3]=100;
 
 
 
 
}
 
function card_2(){
 
if(base[3]>50)point=point+1;  
if(base[3]>50)base[3]=0;  
if(base[2]>50)point=point+1;  
if(base[2]>50)base[2]=0; 
 if(base[1]>50)base[3]=100; 
  if(base[1]>50)base[1]=0; 
 
base[2]=100;
 
 
 
 
}
 
 
 
function card(){
 
if(hit==1)card_1();
if(hit==2)card_2();
if(hit==3)card_3();
if(hit==4)card_4();
if(hit==5)out=out+1;  
if(hit==6)out=out+1; 
if(hit==7)card_7();
 
}
 
function card_1(){
 
if(base[3]>50)point=point+1;  
if(base[3]>50)base[3]=0;    
if(base[2]>50)base[3]=100; 
if(base[2]>50)base[2]=0; 
if(base[1]>50)base[2]=100; 
if(base[1]>50)base[1]=0; 
 
base[1]=100;
 
}
 
function card_7(){
 
out=out+1;
 
if(out<3){
if(base[3]>50)point=point+1;  
if(base[3]>50)base[3]=0;    
if(base[2]>50)base[3]=100; 
if(base[2]>50)base[2]=0; 
if(base[1]>50)base[2]=100; 
if(base[1]>50)base[1]=0; 
} 
 
}
 
function play(){
 
var qs=new Array();
 
qs[1]=q[1];
for(s=2;s<8;s++){
qs[s]=qs[s-1]+q[s];
}
 
 
n1=qs[7]*Math.random();
 
hit=1;
for(s=1;s<7;s++){
if(n1>qs[s])hit=s+1;
}
 
 
}