[color=blue]
#include<conio.h>
#include<stdlib.h>
#include<stdio.h>
#include<math.h>
#include<string.h>

#define maxlen  400 
#define result  500 

#define base  10 

int a= 0 ,b= 0 ;

void menu_action()
{
	printf("Addition                                           -->'+'\n");
	printf("Subtraction(!!!!! num_1 >= num_2 else error!!!!!!!)-->'-'\n");
	printf("Multiplication                                     -->'*'\n");
	printf("Division                                           -->'/'\n");
}

//чтение числа и переворачиваем его
int read_num(int ar[])
{
    char  ch;
	int ar_temp[maxlen] = { 0 };
	int   j= 0 ,p= 0 ;
	int i= 0 ;

    while((ch=getchar()) >= '0' && ch <= '9')
        ar_temp[i++]=(ch - '0');
		p=i;

	for(i=p- 1 ,j= 0 ;i>= 0 ,j<p;i--,j++)
	{
		ar[j]+=ar_temp[i];
		printf("%d",ar[j]);
	}
    printf("\n%d\n", p);

    return p;
}

//размер выводимого числа без лишних единиц
int size_num(int size_1,int size_2)
{
	return (size_1>size_2)?size_1:size_2; 
}

void write_num(int ar[], int size)
{
    int i;
    for(i =  0 ; i < size; i++)
        printf("%d", ar[i]);    
}


//вывод результата		
void write_res(int ar[], int size)
{
    int i;
    for(i = size; i >=  0 ; i--)
        printf("%d", ar[i]);    
}

//Сравнение длинных чисел
int compare_bignum(int ar1[],int size1, int ar2[],int size2)
{
	int i;				
	
	if (size2 > size1) return ( 1 );
	if (size1 > size2) return ( 0 );

	for (i = size1; i>= 0 ; i--) {
		if (ar1[i] > ar2[i]) return( 0 );
		if (ar2[i] > ar1[i]) return( 1 );
	}

	return( 0 );
}

//Определяем нулевые ли числа
int null(int ar_1[],int size_1)
{
	int i= 0 ;
	while(i<=size_1)
		{
			if(ar_1[i]== 0 )
			{
				i++;
				
			}
			else
				return  1 ;
		}
	return  0 ;
}
//сложение
int add(int ar_1[],int ar_2[],int size,int add[])
{
		int flag= 0 ;
		int i,j,h= 0 ;
		int tmp= 0 ;
		for(i= 0 ,j= 0 ; i<=size&&j<=size ;i++,j++,h++)
		{
			tmp=ar_1[i]+ar_2[j]+flag;
			if(tmp<base)
			{
				add[h]=tmp;
				flag= 0 ;
			}
			else
			{
				add[h]=tmp-base;
				flag= 1 ;
				if((i >= j ? i : j) == size)
				{
					add[h]=flag;
					h++;
				}
			}            
		}
		return (h);
}

//вычитание
int sub(int ar_1[],int ar_2[],int size,int sub[])
{
	int flag= 0 ;
	int i,j,h= 0 ;
	int tmp= 0 ;

	for(i= 0 ,j= 0 ;i<=size&&j<=size ;i++,j++,h++)
		{
			tmp=ar_1[i]-ar_2[j]-flag;
			if(tmp>= 0 )
			{
				sub[h]=tmp;
				flag= 0 ;
			}
			else
			{
				sub[h]=base+tmp;
				flag= 1 ;
			}            
		}
	return (h);
}

//умножение
int Mul(int ar_1[],int ar_2[],int size1,int size2,int res[])
{
	int tmp= 0 ,carry= 0 ;
	int i,j,h= 0 ;
	for(j= 0 ;j<=size2;j++)
	   {
		for(i= 0 ;i<=size1;i++,h++)
		{
				  tmp=ar_1[i]*ar_2[j]+carry+res[i+j];					
                  res[i+j]=tmp%base;
				  carry=tmp/base;
				  if(i==size1&&j==size2)
					{
							if(carry!= 0 )
							{
								res[i+j]=carry;
							}
							
					}
		}
        carry= 0 ;
	   }
	return (h);
}
//умножение на короткое число
void SMul(int A[],int a,int d,int B[])
{
	int tmp= 0 ,carry= 0 ;
	int i,j= 0 ;
	for(i= 0 ;i<=a- 1 ;i++)
	{
		tmp=A[i]*d+carry;
		if(tmp<base)
		{
			B[j++]=tmp;
			carry= 0 ;
		}
		else
			B[j++]=tmp%base;
			carry=tmp/base;
	}
}

//деление
/*void Div_BIG(int A[],int a,int B[],int b,int Q[])
{
	int U[a+1];
	int u_size=a+1;
	int vJ,uJ;
	int qGuess=0,r;
	int scale=0;
	int i;

	int carry=0,borrow=0;

	int temp,temp1,temp2;
	//U[]-временный мас. равный A с длинной на 1-цу больше
	for(i=0;i<=a-1;i++)
	{
		U[i]=A[i];
	}

	

	scale=BASE/(B[b-1]+1);
	if(scale>1)
	{
		SMul(U,a+1,scale,U);
		SMul(B,b-1,scale,B);
	}
	for(vJ=b-1,uJ=a+vJ-1;vJ>=0;--vJ,--uJ)
	{

		qGuess=(U[uJ]*base+U[uJ-1])/B[b-1];
		r=(U[uJ]*base+U[uJ-1])%B[b-1];

		while(r<base){
			temp2=B[b-2]*qGuess;
			temp1=r*base+U[uJ-2];

			if((temp2>temp1)||(qGuess==base)) {
				--qGuess;
				r+=B[b-1];
			}
			else break;
		}
		
		int *uShift=U+vJ;


		for(i=0;i<b;i++) {
			temp1=B[i]*qGuess+carry;
			carry=temp1/base;
			temp1-=carry/base;
			temp2=uShift[i]-temp1+borrow;
			if(temp2<0){
				uShift[i]=temp2;
				borrow=0;
			}
		}
		temp2=uShift[i]-carry+borrow;
		if(temp2<0) {
			uShift[i]=temp2+base;
			borrow=-1;
		}else{
			uShift[i]=temp2+base;
			borrow=0;
		}
		if(borrow==0) {
			Q[vJ]=qGuess-1;
			carry=0;
			for(i=0;i<b;i++) {
				temp=uShift[i]+B[i]+carry;
				if(temp>=base) {
					uShift[i]=temp-base;
					carry=1;
				}else{
					uShift[i]=temp;
					carry=0;
				}
			}
			uShift[i]=uShift[i]+carry-base;
			i=u_size-1;
			while((i>0)&&(U[i]==0)) i--;
			u_size=i+1;
		}	
	}
}
*/
void main()
{
    int a= 0 ,b= 0 ,h= 0 ;
    int i= 0 ,j= 0 ,k= 0 ;
	int k1= 0 ,k2= 0 ;
    int num_1[maxlen] = { 0 };
    int num_2[maxlen] = { 0 };
    int res[result] = { 0 };
	int div[result] = { 0 };
    int size= 0 ,size_res= 0 ;
    int tmp= 0 ;
	char sig;
	int carry= 0 ;
	//---------------------------------------------
	//ввод операндов
	menu_action();//операции программы для больших чисел
    
	a=read_num(num_1);
    write_num(num_1,a);
    //-------------------------
	printf("\n");
    b=read_num(num_2);
    write_num(num_2,b);
	//-------------------------
	size=size_num(a,b);
	 
    
    //_______________________________________
            printf("\nEnter mathematical action:");
	scanf("%c",&sig);
	switch(sig)
	{

	    //----------------------------------------------------
		case '+':
					
		k1=null(num_1,a);
		k2=null(num_2,b);
		if(k1== 1 ||k2== 1 )
		{
	    i=add(num_1,num_2,size,res);;
	    while(res[i]== 0 ) i--;
		size_res=i;
		printf("\n\n\nresultat:");
		write_res(res,size_res);
		}
		else
			printf("resultat:0");
		break;

		//----------------------------------------------------
		case '-':

		compare_bignum(num_1,a,num_2,b);
		if(k== 1 )
		{
			printf("error!!!\n");
			getch();
			exit( 1 );
		}
		i=sub(num_1,num_2,size,res);
		if((k=null(res,i))== 0 )
		{
			printf("resultat:0");
			break;
		}
	    while(res[i]== 0 ) i--;
		size_res=i;
		printf("resultat:");
		write_res(res,size_res);
		break;
		//----------------------------------------------------
		case '*':

		k1=null(num_1,a);
		k2=null(num_2,b);
		if(k1== 0 ||k2== 0 )
		{
			printf("resultat:0");
			break;
		}
	    i=Mul(num_1,num_2,a,b,res);
	    while(res[i]== 0 ) i--;
	    size_res=i;
	    write_res(res,size_res); 
	    break;
	
		//----------------------------------------------------------
	//	case '/':

		/*scanf("%d",&d);
		SMul(num_1,a,d,res);
		i=a+1;
		while(res[i]==0) i--;
		size_res=i;
		printf("resultat:");
		write_res(res,size_res);
		break;*/


			

		

	
		



		default:
			printf("ERROR");
			break;
	}
    printf("\n");
}