p000L@ - 経済統計練習帳

var con=new Array();
var con_shop=new Array();
var con_con=new Array();
var sale_shop=new Array();
var sale_con=new Array();
var c=new Array();
var k_shop=new Array();
var k_con=new Array();
var c=new Array();
 
function myFunction() {
 
  k_shop[0]=0;
  k_con[0]=10;
  k_shop[1]=0;
  k_con[1]=10;
  c[0]=50;
  con[0]=0;
  sale_shop[0]=0;
  sale_con[0]=0;
 
  for(tr=1;tr<101;tr++){
 
 con_shop[tr]=c[tr-1]-k_shop[tr-1];
 if(con_shop[tr]<0) con_shop[tr]=0;
 con_con[tr]=con[tr-1]-k_con[tr-1]; 
 if(con_con[tr]<0) con_con[tr]=0;
 
  con[tr]=con_shop[tr]+con_con[tr];
 
 
 
  c[tr]=0.5*(50+sale_con[tr-1]+sale_shop[tr-1]);
  sale_shop[tr]=c[tr];
  if(sale_shop[tr]>k_shop[tr])sale_shop[tr]=k_shop[tr];
  sale_con[tr]=con[tr];
  if(sale_con[tr]>k_con[tr])sale_con[tr]=k_con[tr];
 
 
  rate=k_con[tr]/con[tr];
  if(con[tr]<k_con[tr])k_con[tr+1]=k_con[tr]+con_con[tr];
  if(con[tr]<k_con[tr])k_shop[tr+1]=k_shop[tr]+con_shop[tr];
 if(con[tr]>k_con[tr])k_con[tr+1]=k_con[tr]+rate*con_con[tr];
 if(con[tr]>k_con[tr])k_shop[tr+1]=k_shop[tr]+rate*con_shop[tr];
 Logger.log(k_shop[tr]+","+k_con[tr]);
 
  }
 
 
 
 
}