C++大数精度计算(带小数点)
转：
（原出处不可考，若有侵权，请联系我立即删除）
头文件：
// WTNumber.h: interface for the CWTNumber class. // ////////////////////////////////////////////////////////////////////// #if !defined(AFX_WTNUMBER_H__92E62B40_491A_4A75_AB89_FFB160DB2343__INCLUDED_) #define AFX_WTNUMBER_H__92E62B40_491A_4A75_AB89_FFB160DB2343__INCLUDED_ #if _MSC_VER > 1000 #pragma once #endif // _MSC_VER > 1000 #define INT_BIT_MAX 255 #define FLOAT_BIT_MAX 255 class CWTNumber { private: int intbits; /* 整数数位*/ int floatbits; /* 小数有效数位*/ char infinite; /* 无穷大*/ char sign; /* 符号*/ char intpart[INT_BIT_MAX]; /* 整数部分*/ char floatpart[FLOAT_BIT_MAX]; /* 小数部分*/ private: char* m_sz; public: /* 算术函数指针类型.*/ typedef void (*PFNCALC)(const CWTNumber&,const CWTNumber&,CWTNumber&); CWTNumber(); CWTNumber(const char* szNum); ~CWTNumber(); /* 转换成字符串*/ char* ToString(); void FreeString(); /* 初始化WTNumber为0.*/ void InitWTNumberToZero(); /* 判断需要多少个字符空间存储WTNumber转换的字符串.*/ int StrLenByWTNumber(); /* 从字符串转换到WTNumber.*/ void StrToWTNumber(const char *arr); /* 从WTNumber转换到字符串.*/ void WTNumberToStr(char *szBuf); /* 调节数位,删除最高整数位是0的和最低小数位是0的数位.*/ void AdjustBits(); /* 移动小数点,delta=0不移动,delta<0往左移动,delta>0往右移动.*/ void MoveFloatPoint(int delta); /* 使无穷大 */ void MakeInfinite(); /* 比较2个数大小 */ int WTCompare(const CWTNumber& n) const; /* 判断是否为0 */ int IsZero() const; /* 赋值号重载*/ CWTNumber& operator=(const CWTNumber& n); /* 运算符重载 */ CWTNumber operator+(const CWTNumber& n); CWTNumber operator-(const CWTNumber& n); CWTNumber operator*(const CWTNumber& n); CWTNumber operator/(const CWTNumber& n); CWTNumber& operator+=(const CWTNumber& n); CWTNumber& operator-=(const CWTNumber& n); CWTNumber& operator*=(const CWTNumber& n); CWTNumber& operator/=(const CWTNumber& n); bool operator>(const CWTNumber& n); bool operator>=(const CWTNumber& n); bool operator<(const CWTNumber& n); bool operator<=(const CWTNumber& n); bool operator==(const CWTNumber& n); bool operator!=(const CWTNumber& n); /* 加法*/ static void WTAdd(const CWTNumber& n1,const CWTNumber& n2,CWTNumber& Res); /* 乘法*/ static void WTMultiply(const CWTNumber& n1,const CWTNumber& n2,CWTNumber& Res); /* 减法*/ static void WTSubtract(const CWTNumber& n1,const CWTNumber& n2,CWTNumber& Res); /* 除法*/ static void WTDivide(const CWTNumber& n1,const CWTNumber& n2,CWTNumber& Res); /* 根据算术函数返回结果 */ static char *Result(const char *val1,const char *val2,PFNCALC pfnCalc); }; #endif // !defined(AFX_WTNUMBER_H__92E62B40_491A_4A75_AB89_FFB160DB2343__INCLUDED_)
源文件：
// WTNumber.cpp: implementation of the CWTNumber class. // ////////////////////////////////////////////////////////////////////// #include <string.h> #include <stdlib.h> #include "WTNumber.h" ////////////////////////////////////////////////////////////////////// // Construction/Destruction ////////////////////////////////////////////////////////////////////// CWTNumber::CWTNumber() { InitWTNumberToZero(); } CWTNumber::CWTNumber(const char* szNum) { InitWTNumberToZero(); StrToWTNumber(szNum); } CWTNumber::~CWTNumber() { FreeString(); } void CWTNumber::FreeString() { if(m_sz) delete []m_sz; m_sz=NULL; } void CWTNumber::InitWTNumberToZero() { memset(this,0,sizeof(CWTNumber)); } int CWTNumber::StrLenByWTNumber() { int len = floatbits+intbits+1; if(intbits==0) len++; /* .1 --> 0.1*/ if(floatbits) len++; /* '.'*/ if(sign) len++; /* '-'*/ if(infinite) return 11; /* #INFINITE */ return len; } void CWTNumber::StrToWTNumber(const char *arr) { char *point; InitWTNumberToZero(); if(*arr=='-') /* 如果是负数*/ { arr++; sign=1; } point=strchr(arr,'.'); if(point) /* 找到小数点 */ { int n=intbits=point-arr; /* 计算出整数数位 */ while(n) /* 整数数位不==0则循环 */ { intpart[intbits-n]=arr[n-1]-'0'; /* 将数字低位存在低下标元素*/ n--; } while(*++point) { floatpart[floatbits]=*point-'0'; floatbits++; } } else /* 说明没写小数点,全是整数.*/ { int n=intbits=strlen(arr); while(n) { intpart[intbits-n]=arr[n-1]-'0'; n--; } } AdjustBits(); /* 处理-0 和0的情况*/ if(floatbits==0) { if(intbits==0 || intbits==1&&intpart[0]==0) sign=0; } } void CWTNumber::WTNumberToStr(char *szBuf) { int n=intbits,c; memset(szBuf,0,StrLenByWTNumber()); if(sign) /* 如果是负数*/ { *szBuf++='-'; } if(infinite) { strcat(szBuf,"#INFINITE"); return; } while(n) { szBuf[intbits-n]=intpart[n-1]+'0'; n--; } c=0; /* 是否加了0*/ if(intbits==0) { strcat(szBuf,"0"); c=1; } if(floatbits) strcat(szBuf,"."); n=0; while(n<floatbits) { szBuf[intbits+1+n+c]=floatpart[n]+'0'; n++; } } void CWTNumber::AdjustBits() { while(intbits>1&&intpart[intbits-1]==0) intbits--; while(floatbits&&floatpart[floatbits-1]==0) floatbits--; } void CWTNumber::MoveFloatPoint(int delta) { /* delta<0则往左移动小数点,delta>0则向右移动小数点 */ if(delta) { CWTNumber n=*this; InitWTNumberToZero(); sign=n.sign; if(delta<0) { int i; delta=-delta; for(i=delta;i<n.intbits;i++) { intpart[intbits++]=n.intpart[i]; } for(i=delta-1;i>=0;i--) { floatpart[floatbits++]=n.intpart[i]; } for(i=0;i<n.floatbits;i++) { floatpart[floatbits++]=n.floatpart[i]; } } else { int i; for(i=delta;i<n.floatbits;i++) /* 处理小数部分*/ { floatpart[floatbits++]=n.floatpart[i]; } for(i=delta-1;i>=0;i--) /* 小数到整数的部分*/ { intpart[intbits++]=n.floatpart[i]; } for(i=0;i<n.intbits;i++) /* 整数部分*/ { intpart[intbits++]=n.intpart[i]; } } } AdjustBits(); } void CWTNumber::MakeInfinite() { infinite=1; } int CWTNumber::WTCompare(const CWTNumber& n) const { /* 首先是比较符号*/ if(sign==0&&n.sign!=0) /* pn1是正数,pn2是负数*/ return 1; /* >*/ else if(sign!=0&&n.sign==0) /* pn1是负数,pn2是正数*/ return -1; /* <*/ else /* 同号状态*/ { /* 比较整数部分*/ if(intbits>n.intbits) /* pn1整数数位多*/ return sign?-1:1; else if(intbits<n.intbits) return sign?1:-1; else /* 整数数位相同*/ { int i=intbits-1; /*指到最高位*/ while(i>=0) { if(intpart[i]>n.intpart[i]) return sign?-1:1; else if(intpart[i]<n.intpart[i]) return sign?1:-1; else i--; } /* 整数部分相同,比较小数部分*/ for(i=0;i<floatbits&&i<n.floatbits;) { if(floatpart[i]>n.floatpart[i]) return sign?-1:1; else if(floatpart[i]<n.floatpart[i]) return sign?1:-1; else i++; } if(i<floatbits) return sign?-1:1; if(i<n.floatbits) return sign?1:-1; return 0; /* 相等*/ } } } int CWTNumber::IsZero() const { if(floatbits==0&&intbits==0) return 1; if(floatbits==0&&intbits==1&&intpart[0]==0) return 1; return 0; } void CWTNumber::WTAdd(const CWTNumber& n1,const CWTNumber& n2,CWTNumber& Res) { Res.InitWTNumberToZero(); if(n1.sign^n2.sign) /*异号*/ { CWTNumber rn2=n2; rn2.sign=n1.sign; WTSubtract(n1,rn2,Res); } else /*同号*/ { int maxfloatbits=n1.floatbits>n2.floatbits?n1.floatbits:n2.floatbits; int addbit=0; /* 进位值*/ int i,j; for(i=maxfloatbits-1;i>=0;i--) { int value=n1.floatpart[i]+n2.floatpart[i]+addbit; addbit=value/10; /* 看看是否超过10. 设置进位值*/ Res.floatpart[i]=value%10; } Res.floatbits=maxfloatbits; /* 到此,小数部分计算完毕.*/ for(j=0;j<n1.intbits||j<n2.intbits;j++) { int value=n1.intpart[j]+n2.intpart[j]+addbit; addbit=value/10; Res.intpart[j]=value%10; Res.intbits++; } if(addbit>0) { Res.intpart[j]=addbit; Res.intbits++; } Res.sign=n1.sign; /*决定符号*/ Res.AdjustBits(); } } void CWTNumber::WTMultiply(const CWTNumber& n1,const CWTNumber& n2,CWTNumber& Res) { CWTNumber z1=n1,z2=n2; CWTNumber sum; int i,j; sum.InitWTNumberToZero(); Res.InitWTNumberToZero(); z1.MoveFloatPoint(z1.floatbits); z2.MoveFloatPoint(z2.floatbits); /* 计算z1*z2 */ for(i=0;i<z2.intbits;i++) { CWTNumber tmp; /* 存放临时乘积*/ int addbit=0; tmp.intbits=z1.intbits+i; for(j=0;j<z1.intbits;j++) { int value = z2.intpart[i]*z1.intpart[j]+addbit; addbit=value/10; tmp.intpart[j+i]=value%10; } if(addbit) { tmp.intpart[j+i]=addbit; tmp.intbits++; } WTAdd(sum,tmp,Res); sum=Res; } Res=sum; Res.MoveFloatPoint(-(n1.floatbits+n2.floatbits)); /* 判断符号,异号为负*/ if(n1.sign^n2.sign) Res.sign=1; } void CWTNumber::WTSubtract(const CWTNumber& n1,const CWTNumber& n2,CWTNumber& Res) { Res.InitWTNumberToZero(); if(n1.sign^n2.sign) /* 异号情况*/ { CWTNumber rn2=n2; rn2.sign=n1.sign; WTAdd(n1,rn2,Res); } else /* 同号情况*/ { int cmp=n1.WTCompare(n2); int swapflag,i,maxfloatbits,subtractbit; if(cmp==0) return; /* 相等就没必要再减了.*/ swapflag=n1.sign==0?cmp==-1:cmp==1; const CWTNumber* pn1=&n1; const CWTNumber* pn2=&n2; if(swapflag) { const CWTNumber *t=pn1; pn1=pn2; pn2=t; } maxfloatbits=pn1->floatbits>pn2->floatbits?pn1->floatbits:pn2->floatbits; subtractbit=0; /* 退位值*/ /* 先计算小数部分*/ for(i=maxfloatbits-1;i>=0;i--) { if(pn1->floatpart[i]-subtractbit<pn2->floatpart[i]) { int value=pn1->floatpart[i]-pn2->floatpart[i]-subtractbit+10; subtractbit=1; Res.floatpart[i]=value; } else { int value=pn1->floatpart[i]-pn2->floatpart[i]-subtractbit; subtractbit=0; Res.floatpart[i]=value; } } Res.floatbits=maxfloatbits; /* 至此小数部分计算完毕.*/ for(i=0;i<pn1->intbits||i<pn2->intbits;i++) { if(pn1->intpart[i]-subtractbit<pn2->intpart[i]) { int value=pn1->intpart[i]-pn2->intpart[i]-subtractbit+10; subtractbit=1; Res.intpart[i]=value; } else { int value=pn1->intpart[i]-pn2->intpart[i]-subtractbit; subtractbit=0; Res.intpart[i]=value; } Res.intbits++; } Res.sign=swapflag?!n1.sign:n1.sign; /*决定符号*/ Res.AdjustBits(); } } void CWTNumber::WTDivide(const CWTNumber& n1,const CWTNumber& n2,CWTNumber& Res) { CWTNumber z1=n1,z2=n2; int deta=z2.floatbits-z1.floatbits; z1.MoveFloatPoint(z1.floatbits); z2.MoveFloatPoint(z2.floatbits); Res.InitWTNumberToZero(); if(n1.IsZero()) return ; if(n2.IsZero()) { Res.sign=n1.sign; Res.MakeInfinite(); return ; } z1.sign=z2.sign=0; /*统一符号,便于比较大小*/ while(z1.intbits!=z2.intbits) { /*确保数位相等,这步耗费很多时间*/ if(z1.intbits<z2.intbits) { z1.MoveFloatPoint(1); deta--; } else { z2.MoveFloatPoint(1); deta++; } } while(Res.floatbits<(INT_BIT_MAX/2)) { int cmp=z1.WTCompare(z2); int n=10; CWTNumber mulres,subres; if(cmp==-1) { /*z1<z2*/ z1.MoveFloatPoint(1); Res.floatpart[Res.floatbits++]=0; continue; } else if(cmp==0) { /*z1==z2*/ Res.floatpart[Res.floatbits++]=1; break; } do { /*找商*/ CWTNumber tmp; tmp.intpart[0]=--n; tmp.intbits=1; WTMultiply(z2,tmp,mulres); } while((cmp=mulres.WTCompare(z1))==1); Res.floatpart[Res.floatbits++]=n; if(cmp==0) break; WTSubtract(z1,mulres,subres); subres.MoveFloatPoint(1); z1=subres; } Res.MoveFloatPoint(1); Res.MoveFloatPoint(deta); /* 判断符号,异号为负*/ if(n1.sign^n2.sign) Res.sign=1; } char *CWTNumber::Result(const char *val1,const char *val2,PFNCALC pfnCalc) { CWTNumber n1,n2,res; n1.StrToWTNumber(val1); n2.StrToWTNumber(val2); pfnCalc(n1,n2,res); return res.ToString(); } char* CWTNumber::ToString() { FreeString(); m_sz=new char[StrLenByWTNumber()]; WTNumberToStr(m_sz); return m_sz; } CWTNumber& CWTNumber::operator=(const CWTNumber& n) { if(this!=&n) { FreeString(); memcpy(this,&n,sizeof(CWTNumber)); if(n.m_sz) { m_sz=strdup(n.m_sz); } } return *this; } CWTNumber CWTNumber::operator+(const CWTNumber& n) { CWTNumber res; CWTNumber::WTAdd(*this,n,res); return res; } CWTNumber CWTNumber::operator-(const CWTNumber& n) { CWTNumber res; CWTNumber::WTSubtract(*this,n,res); return res; } CWTNumber CWTNumber::operator*(const CWTNumber& n) { CWTNumber res; CWTNumber::WTMultiply(*this,n,res); return res; } CWTNumber CWTNumber::operator/(const CWTNumber& n) { CWTNumber res; CWTNumber::WTDivide(*this,n,res); return res; } CWTNumber& CWTNumber::operator+=(const CWTNumber& n) { CWTNumber n1=*this,n2=n; CWTNumber::WTAdd(n1,n2,*this); return *this; } CWTNumber& CWTNumber::operator-=(const CWTNumber& n) { CWTNumber n1=*this,n2=n; CWTNumber::WTSubtract(n1,n2,*this); return *this; } CWTNumber& CWTNumber::operator*=(const CWTNumber& n) { CWTNumber n1=*this,n2=n; CWTNumber::WTMultiply(n1,n2,*this); return *this; } CWTNumber& CWTNumber::operator/=(const CWTNumber& n) { CWTNumber n1=*this,n2=n; CWTNumber::WTDivide(n1,n2,*this); return *this; } bool CWTNumber::operator>(const CWTNumber& n) { return WTCompare(n)==1; } bool CWTNumber::operator>=(const CWTNumber& n) { return WTCompare(n)!=-1; } bool CWTNumber::operator<(const CWTNumber& n) { return WTCompare(n)==-1; } bool CWTNumber::operator<=(const CWTNumber& n) { return WTCompare(n)!=1; } bool CWTNumber::operator==(const CWTNumber& n) { return WTCompare(n)==0; } bool CWTNumber::operator!=(const CWTNumber& n) { return WTCompare(n)!=0; }
使用演示:
#include <stdio.h> #include "WTNumber.h" int main() { char sz1[256]=""; char sz2[256]=""; puts("请输入两个数字:"); while(scanf("%s%s",sz1,sz2)!=-1) { CWTNumber n1(sz1),n2(sz2); printf("两数相加结果:\n%s\n",(n1+n2).ToString()); printf("两数相减结果:\n%s\n",(n1-n2).ToString()); printf("两数相乘结果:\n%s\n",(n1*n2).ToString()); printf("两数相除结果:\n%s\n",(n1/n2).ToString()); puts("请输入两个数字:"); } return 0; }
