原文:http://www.x86pro.com/articleViewer.php?pid=160
固定精度版本,即运行时无法修改精度.
头文件:
// 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;
}
运行结果: