%求某一時刻的到達率（x為時刻y為到達率）
function[y]=write(x)
if(x<=8&&x>=5)
    y=400*x-1800;
else
    if(x<=18&&x>8)
        y=1400;
    else
        if(x>18&&x<=21)
        y=-400*x+8600;
        else
        y=0;
        end
    end
end