ppp100 - プログラム倉庫

class pro{
public static void main(String args[]){
double h;
double a[][]=new double[202][402];
int p2[]=new int[201];
int p3[]=new int[201];
int m,n,px;
double cs,ys;
double c1,c2,y1,y2;
double maxv,minv;
double x1,x2,z;
double th;
int maxn,maxm;
int t1,t2;
int p1;
th=1;
h=0.01;
for (m=0;m<202;m++){
for (n=0;n<402;n++){
a[m][n]=0;
}
}

for (m=1;m<201;m++){
a[m][m]=1;
}

for (m=1;m<202;m++){
a[m][m+200]=1;
}

for (m=1;m<201;m++){
a[m][0]=h;
}

for (n=1;n<101;n++){
a[201][n]=1;
a[201][n+100]=-1;  
}

a[201][0]=0;
for (n=1;n<101;n++){
c1=n*h;
c2=(n-1)*h;
if (n==1)a[0][n]=999;  
if (n>1)a[0][n]=(Math.log(c1)-Math.log(c2))/h;  
y1=n*h;
y2=(n-1)*h;
if(n<100)a[0][n+100]=(Math.log(1-y1/th)-Math.log(1-y2/th))/h;
if(n==100)a[0][n+100]=-999;
}


maxv=0;
maxn=999;
for (n=1;n<402;n++){
if (a[0][n]>maxv)maxn=n;
if (a[0][n]>maxv)maxv=a[0][n];
}
System.out.println(maxn);
t1=0;
while(t1<1000){
minv=999;
maxm=9999;
for (m=1;m<202;m++){
x1=a[m][maxn];
px=0;
if (x1==0)px=100;
if (x1<0)px=100;
if (px>50)x1=1;
x2=a[m][0]/x1;
if (px>50)x2=1000;
if (x2<0)x2=1000;
if (x2<minv)maxm=m;
if (x2<minv)minv=x2;
}
System.out.println(maxm);
for (m=0;m<202;m++){
z=a[m][maxn]/a[maxm][maxn];
if (maxm==m)z=0;
for (n=0;n<402;n++){
a[m][n]=a[m][n]-z*a[maxm][n];
}
}
maxv=0;
maxn=9999;
for (n=1;n<202;n++){
if (a[0][n]>maxv)maxn=n;
if (a[0][n]>maxv)maxv=a[0][n];
}
System.out.println(maxn);
if (maxn>9000)t1=10000;
}

for (n=1;n<201;n++){
p1=0;
p3[n]=0;
for (m=1;m<202;m++){
if (a[m][n]==0)p1=p1+1;
if (a[m][n]>0)p3[n]=m;
if (a[m][n]<0)p3[n]=m;
}
p2[n]=0;
if (p1==200)p2[n]=100;
}

cs=0;
ys=0;
for (n=1;n<101;n++){
m=p3[n];
if (p2[n]>50)cs=cs+a[m][0]/a[m][n];
}

for (n=101;n<201;n++){
m=p3[n];
if (p2[n]>50)ys=ys+a[m][0]/a[m][n];
}
System.out.println(cs);
System.out.println(ys);  

}
}