しまさこん - 経済統計練習帳

var y = new Array();
var c = new Array();
var d = new Array();
var m = new Array();
var point = new Array();
var ys = new Array();
var yy = new Array();
var alpha;
 
function sample() {
 
    y[1] = 400;
    y[2] = 300;
    y[3] = 200;
 
    c[1] = 350;
    c[2] = 300;
    c[3] = 250;
 
 
    for (s = 1; s < 4; s++) {
        d[s] = new Array();
    }
 
    d[1][1] = 0;
    d[1][2] = 5;
    d[1][3] = 10;
    d[2][1] = 5;
    d[2][2] = 0;
    d[2][3] = 5;
    d[3][1] = 10;
    d[3][2] = 5;
    d[3][3] = 0;
 
    m[1] = 10;
    m[2] = 8;
    m[3] = 6;
 
    for (s = 1; s < 4; s++) {
        point[s] = new Array();
    }
 
 
    alpha = 0.5;
 
    /*供給＝＞需要*/
 
 
    for (s = 1; s < 4; s++) {
        for (sx = 1; sx < 4; sx++) {
            point[s][sx] = alpha * m[s] - (1 - alpha) * d[s][sx];
        }}
 
 
    for (s = 1; s < 4; s++) {
        ys[s] = new Array();
    }
 
    for (sx = 1; sx < 4; sx++) {
        p1 = 0;
        for (s = 1; s < 4; s++) {
            p1 = p1 + point[s][sx];
        }
 
        for (s = 1; s < 4; s++) {
            ys[s][sx]=c[sx]*point[s][sx] / p1;
        }
    }
 
 
    for (s = 1; s < 4; s++) {
        y1 = 0;
    for (sx = 1; sx < 4; sx++) {
        y1=y1+ys[s][sx];
    }
    yy[s] = y1;
    }
 
 
 
    alert(yy[1]);
 
 
 
 
 
 
}