#include <stdio.h>

double gosa(a,b)
int a, b;
{
  return (fabs(a-((double) a+b)/4));
}

int main(void)
{
    int x,y,z,i,j;
    int occur[2];
    int lessn, moren;

    printf("input seed>");
    scanf("%d",&x);
    srand(x);

    printf("input (inferior,superior)\n");
    printf("number of inf>");
    scanf("%d", &y);
    printf("number of sup>");
    scanf("%d", &z);

    lessn = 0;
    moren = 0;
    for (j=0; j<1000; j++) {
      occur[0]=0;
      occur[1]=0;
      for (i=0; i<y+z; i++) {
	if (rand() % 4 == 0) {occur[0]++;}
	else {occur[1]++;}
      }			     
      if (gosa(y,z) <= gosa(occur[0],occur[1])) { 
	moren ++; 
      } else {
	lessn ++;
      };
    }
    printf("(lessn,moren)=%8d, %8d\n", lessn, moren) ;
}