enshu5.c

#include<stdio.h>
#include<stdlib.h>
#include<time.h>
#include<math.h>
#include<limits.h>
#define KETA 10

struct NUMBER
{
	int n[KETA];
	int sign;
};


void clearByZero(); //0初期化
void dispNumber(); //表示
void dispNumberZeroSupress();
void setRand(); //ランダム初期化
void copyNumber(); //コピー
void getAbs();  //絶対値
int isZero(); //ゼロかどうか
int mulBy10(); //10かける
int divBy10(); //10で割る
void swap(); //入れ替え
void sort();
int setSign(); //符号を決める
int getSign(); //符号を読み取る
int numComp(); //大小比較
void setInt(); //多倍長配列に入れる
void getInt();
int add(); //足すc=a+b
int sub(); //引くc=a-b
int simpleMultiple(); //かける
int multiple();

void A();


int main(void)
{
	srandom(time(NULL));

	struct NUMBER a,b,c,d,e;
	int r;
	int x=0,y=0,z=0;
	int i,flag;

	//setint のテスト

	setInt(&a,-12344);
	printf("a = ");
	dispNumber(&a);
	printf("\n");

	//setSignのテスト
	copyNumber(&a,&b);
	setSign(&b,1);
	printf("b = ");
	dispNumber(&b);
	printf("\n");

	//getSignのテスト

	r=getSign(&b);
	printf("getSign() = %d\n",r);

	//numCompのテスト
	r=numComp(&a,&b);
	printf("numComp() = %d\n",r);

	setInt(&b,-9996702);
	printf("b  =  ");
	dispNumber(&b);
	printf("\n");

	//addのテストプログラム
	add(&b,&a,&c);
	printf("add = ");
	dispNumber(&c);
	printf("\n");

	//subのテストプログラム
	sub(&c,&a,&d);
	printf("sub = ");
	dispNumber(&d);
	printf("\n");

	setInt(&a,12345);
	setInt(&b,67894);

	//multipleのテスト
	multiple(&b,&a,&d);
	printf("mul = ");
	dispNumber(&d);
	printf("\n");

	setInt(&a,INT_MIN);
	printf("a = ");
	dispNumber(&a);
	printf("\n");



	putchar('\n');

	
	return 0;
}

void clearByZero(struct NUMBER *a)
{
	int i;

	for(i=0;i<KETA;i++)
		a->n[i]=0;
	setSign(a,1);
}

void dispNumber(struct NUMBER *a)
{
	int i;
	if(getSign(a) == 1)
		printf(" + ");
	else if(getSign(a) == -1)
		printf(" - ");
	for(i=KETA-1;i>=0;i--)
		printf("%2d",a->n[i]);
}

void dispNumberZeroSupress(struct NUMBER *a)
{
	int i=KETA-1;
	if(getSign(a) == 1)
		printf(" + ");
	else if(getSign(a) == -1)
		printf(" - ");

	while(!a->n[i])
		i--;
	for(;i>=0;i--)
		printf("%2d",a->n[i]);
}

void setRand(struct NUMBER *a,int n)
{
	int i;
	
	if(n>KETA)
		printf("error\n");
	else
	{
		if(random()%2==1)
		{
			a->sign=1;
		}
		else if(random()%2==0)
		{
			a->sign=-1;
		}

		for(i=n-1;i>=0;i--)
		{
			a->n[i]=random()%10;
		}
	}
}

void copyNumber(struct NUMBER *a,struct NUMBER *b)
{
	int i;
	setSign(b,a->sign);
	for(i=KETA-1;i>=0;i--)
	{
		b->n[i]=a->n[i];
	}
}

void getAbs(struct NUMBER *a,struct NUMBER *b)
{
	copyNumber(a,b);
	setSign(b,1);
}

int isZero(struct NUMBER *a)
{
	int i,flag=0;
	for(i=0;i<KETA;i++)
	{
		if(a->n[i]!=0)
		{
			flag=-1;
			break;
		}
	}

	return flag;

}

int mulBy10(struct NUMBER *a,struct NUMBER*b)
{
	int i,flag=0;
	clearByZero(b);
	if(a->n[KETA-1]!=0)
		flag=-1;
	else
		for(i=KETA-1;i>0;i--)
		{
			b->n[i]=a->n[i-1];
		}

	return flag;
}

int divBy10(struct NUMBER *a,struct NUMBER *b)
{
	int i,flag=0;
	flag=a->n[0];
	clearByZero(b);

	for(i=0;i<KETA-1;i++)
		b->n[i]=a->n[i+1];
	return flag;

}

void swap(struct NUMBER *a,struct NUMBER *b)
{
	struct NUMBER temp;
	copyNumber(a,&temp);
	copyNumber(b,a);
	copyNumber(&temp,b);

}

/*void sort(struct NUMBER *a)
{
	int i,j;
	for(i=0;i<10;i++)
		for(j=i;j<10;j++)
			if(a->n[i]>a->n[i+1])
				swap

}*/


void setSign(struct NUMBER *p,int s)
{
	if(s==1)
		p->sign=1;
	if(s==-1)
		p->sign=-1;
}

int getSign(struct NUMBER *a)
{
	if(a->sign==1)
		return 1;
	else if(a->sign==-1)
		return -1;
}

int numComp(struct NUMBER *a,struct NUMBER *b)
{
	int i;
	if(getSign(a)>getSign(b))
		return 1;
	else if(getSign(a)<getSign(b))
		return -1;
	else
	{
		if(getSign(a)==1)
		{
			for(i=KETA-1;i>=0;i--)
			{
				if(a->n[i] > b->n[i])
				{
					return 1;
					break;
				}
				if(a->n[i] < b->n[i])
				{
					return -1;
					break;
				}
			}
			return 0;
		}
		else if(getSign(a)==-1)
		{
			for(i=KETA-1;i>=0;i--)
			{
				if(a->n[i] > b->n[i])
				{
					return -1;
					break;
				}
				if(a->n[i] < b->n[i])
				{
					return 1;
					break;
				}
			}
			return 0;
		}
		else
			return 0;
	}
}

int setInt(struct NUMBER *a,int x)
{
	int i;
	clearByZero(a);
	if(x<0)
	{
		setSign(a,-1);
		x=x*(-1);
	}
	else if(x>0)
		setSign(a,1);
	else
		setSign(a,0);

	for(i=0;i<KETA;i++)
	{
		a->n[i]=x%10;
		x=x/10;
		if(x<1)
			break;
	}
}

/*void getInt(struct NUMBER *a,int *x)
{
	int i;
	for(i=0;i<KETA;i++)

}*/

int add(struct NUMBER *a,struct NUMBER *b, struct NUMBER *c)
{
	int i,e=0,d=0;
	int flag=0;
	struct NUMBER temp,temp2;
	clearByZero(&temp);
	clearByZero(&temp2);
	clearByZero(c);

	if(getSign(a)==1)
	{
		if(getSign(b)==1)
		{
			for(i=0;i<KETA;i++)
			{
				d=a->n[i]+b->n[i]+e;
				if(i==KETA-1 && d>=10)
				{
					printf("OverFlow\n");
					clearByZero(c);
					flag=1;
					break;
				}
				c->n[i]=d%10;
				e=d/10;	
			}
		}
		else if(getSign(b)==-1)
		{
			getAbs(b,&temp);
			sub(a,&temp,c);
		}
	}
	else
	{
		if(getSign(b)==1){
			getAbs(a,&temp);
			sub(b,&temp,c);
		}
		else if(getSign(b)==-1)
		{
			getAbs(a,&temp);
			getAbs(b,&temp2);
			add(&temp,&temp2,c);
			setSign(c,-1);
		}
	}

	return flag;
}

int sub(struct NUMBER *a,struct NUMBER *b,struct NUMBER *c)
{
	int i,h=0,d=0;
	struct NUMBER temp;
	clearByZero(&temp);
	clearByZero(c);
	if(getSign(a)==1)
	{
		if(getSign(b)==1)
		{
			for(i=0;i<KETA;i++)
			{
				if(numComp(a,b)==1)
				{
					d=a->n[i]-b->n[i]-h;
					h=0;
					if(d<0)
					{
						d+=10;
						h=1;
					}
					c->n[i]=d;
				}
				else
				{
					getAbs(b,&temp);
					sub(&temp,a,c);
					setSign(c,-1);
				}

			}
		}
		else if(getSign(b)==-1)
		{
			getAbs(b,&temp);
			add(a,&temp,c);
		}
	}
	else if(getSign(a)==-1)
	{
		if(getSign(b)==1)
		{
			getAbs(a,&temp);
			add(b,&temp,c);
			setSign(c,-1);
		}
		else if(getSign(b)==-1)
		{
			getAbs(b,&temp);
			add(&temp,a,c);
		}
	}

	return 0;
}


int simpleMultiple(int a,int b,int *c)
{
	int i;
	for(i=0;i<b;i++)
		c+=a;
}


int multiple(struct NUMBER *a,struct NUMBER *b,struct NUMBER *c)
{
	int i,j,h=0,tempb,tempa,e;
	struct NUMBER d,mai1,mai2,temp;
	clearByZero(&d);
	clearByZero(c);
	if(getSign(a)==1)
	{
		if(getSign(b)==1)
		{
			for(i=0;i<KETA-1;i++)
			{
				h=0;
				clearByZero(&d);
				
				tempb=b->n[i];
				for(j=0;j<KETA;j++)
				{
					tempa=a->n[j];
					e=tempa*tempb + h;
					if(j+i<KETA)
						d.n[j+i]=e%10;
					h=e/10;
				}
				copyNumber(c,&temp);
				add(&temp,&d,c);
			}
		}
		else if(getSign(b)==-1)
		{
			getAbs(b,&mai1);
			multiple(a,&mai1,c);
			setSign(c,-1);
		}
	}
	else if(getSign(a)==-1)
	{
		if(getSign(b)==1)
		{
			getAbs(a,&mai1);
			multiple(b,&mai1,c);
			setSign(c,-1);
		}
		else if(getSign(b)==-1)
		{
			getAbs(a,&mai1);
			getAbs(b,&mai2);
			multiple(&mai1,&mai2,c);
		}
	}
}