#include <ctype.h>
#include <stdio.h>
#include <stdlib.h>
#include<math.h>
#include<malloc.h>
void hua(void);
void jiemian(void);
int shu1(char str[]);
void jinzhi(void);
double jisuan(char a[]);
void sizeyunsuan(void);
void sizeyunsuan2(void);
float operation(char []);
float shu(int x,int y,char str[]);
void cheng(int numnum,int s[],float num[],char str[]);
float suan(int numnum,int chengnum,int s[],float num[],char str[]);
main(void)
{
jiemian();
}
void sizeyunsuan(void)
{
char str[26];
int i,c;
float j;
printf("\n");
printf("该项功能可实现10个数（包括负数和小数）以内的不含括号的四则运算\n");
printf("例如3+2.5*7+-5\n\n");
printf("请输入要计算的式子，以回车结束\n");
scanf("%s",str);
j=operation(str);
printf("结果：\n");
for(i=0;str[i]!='\0';i++)
printf("%c",str[i]);
printf("=%.3f\n",j);
printf("\n");
printf("如果您没有得到您想要的数，请检查您输入的式子是否正确\n\n");
printf("继续执行该功能请输1,返回上一目录请输2,清屏请输3,退出请输4,以回车结束\n");
scanf("%d",&c);
switch(c)
{
case 1: sizeyunsuan();
case 2: jiemian();
case 3: system("cls");jiemian();
case 4: exit(0);
}
}
float operation(char str[])
{
int i,p=0,q=0,jia[9],cheng[9],s[9]={0};
float l,num[10];
int j,k=0;
int numnum=0,jianum=0,chengnum=0;
for(j=0;str[j]!='\0';j++)
{
if((isdigit(str[j])>0)&&(isdigit(str[j+1])==0&&str[j+1]!='.')) numnum++,s[++k]=j+1;
}
for(k=0;k<numnum;k++)
{
num[k]=shu(s[k],s[k+1],str);
}
for(i=0;i<numnum;i++)
{
if(str[s[i]]=='+'||str[s[i]]=='-') jia[p]=s[i],p++,jianum++;
else if (str[s[i]]=='*'||str[s[i]]=='/') cheng[q]=s[i],q++,chengnum++;
}
l=suan(numnum,chengnum,s,num,str);
return l;
}
float shu(int x,int y,char str[])
{
float b,c;
int sign=1,i,chu=10,a=0;
for(i=(x==0)?x:x+1;(c=str[i])!='/0';i++)
{
if(c=='-')sign=-1;
if (isdigit(c))
{
b=c-'0';
while (isdigit(c=str[++i]))
{b=b*10+c-'0';}
if (c=='.')
{
while(isdigit(c=str[++i]))
{
b=b+(c-'0')/chu;
chu*=10;
}
}
b*=sign;
a=1,chu=10;
}
if(a) {a=0;break;}
}
return b;
}
void cheng(int numnum,int s[],float num[],char str[])
{
int i,j;
for (i=1;i<numnum;i++)
{
if (str[s[i]]=='*')
{
num[i-1]=num[i-1]*num[i];
for(j=i;j<numnum-1;j++)
{
num[j]=num[j+1];
num[j+1]=0;
s[j]=s[j+1];
s[j+1]=s[numnum];
}
}
if (str[s[i]]=='/')
{
num[i-1]=num[i-1]/num[i];
for(j=i;j<numnum-1;j++)
{
num[j]=num[j+1];
num[j+1]=0;
s[j]=s[j+1];
s[j+1]=s[numnum];
}
}
}
}
float suan(int numnum,int chengnum,int s[],float num[],char str[])
{
float huan;
int i=0;
for(i=0;i<chengnum;i++) cheng(numnum,s,num,str);
huan=num[0];
for(i=1;i<numnum-chengnum;i++)
{
switch(str[s[i]])
{
case '+':huan=num[i-1]+num[i];num[i]=huan;break;
case '-':huan=num[i-1]-num[i];num[i]=huan;break;
}
}
return huan;
}
double jisuan(char a[])
{
int i=1,j,k,m,cnt=0,t1=0,t2=0,t3=0;
char nibo[50],zhan2[50];
double x,n,l,z=0,zhan3[50];
typedef struct
{
double d1;
int d2;
}dd;
typedef struct
{
dd data[50];
int top;
}zhan1;
zhan1 *shu;
shu=(zhan1 *)malloc(sizeof(zhan1));
shu->top=0;
while(a[i]!='\0')
{
if(a[i]>='0'&&a[i]<='9')
{
z=0;
j=i+1;
while(a[j]>='0'&&a[j]<='9')
{j++;}
j--;
for(k=i;k<=j;k++)
{
z=z*10+a[k]-'0';
}
j=j+1;
x=z;
if(a[j]=='.')
{
l=1;
i=j+1;
j=i+1;
while(a[j]>='0'&&a[j]<='9')
{j++;}
j--;
for(k=i;k<=j;k++)
{
n=pow(0.1,l);
l=l+1;
x=x+n*(a[k]-'0');
}
i=j+1;
}
else i=j;
shu->data[++shu->top].d1=x;
shu->data[shu->top].d2=++cnt;
nibo[++t1]='0'+shu->data[shu->top].d2;
nibo[t1+1]='\0';
}
else if(a[i]=='(')
{
zhan2[++t2]=a[i];
i++;
}
else if(a[i]==')')
{
j=t2;
while(zhan2[j]!='(')
{
nibo[++t1]=zhan2[j];
nibo[t1+1]='\0';
j--;
}
t2=j-1;
i++;
}
else if(a[i]=='+')
{
while(t2>0&&zhan2[t2]!='(')
{
nibo[++t1]=zhan2[t2];
nibo[t1+1]='\0';
t2--;
}
zhan2[++t2]=a[i];
i++;
}
else if(a[i]=='-')
{
if(a[i-1]=='$')
{
a[0]='0';
i=0;
}
else if(a[i-1]=='(')
{
a[i-1]='0';
a[i-2]='(';
i=i-2;
t2--;
}
else
{
while(t2>0&&zhan2[t2]!='(')
{
nibo[++t1]=zhan2[t2];
nibo[t1+1]='\0';
t2--;
}
zhan2[++t2]=a[i];
i++;
}
}
else if(a[i]=='*'||a[i]=='/')
{
while(zhan2[t2]=='*'||zhan2[t2]=='/'||zhan2[t2]=='^'||zhan2[t2]=='#')
{
nibo[++t1]=zhan2[t2];
nibo[t1+1]='\0';
t2--;
}
zhan2[++t2]=a[i];
i++;
}
else if(a[i]=='^'||a[i]=='#')
{
while(zhan2[t2]=='^'||zhan2[t2]=='#')
{
nibo[++t1]=zhan2[t2];
nibo[t1+1]='\0';
t2--;
}
zhan2[++t2]=a[i];
i++;
}
}
while(t2>0)
{
nibo[++t1]=zhan2[t2];
nibo[t1+1]='\0';
t2--;
}
j=1;t3=0;
while(j<=t1)
{
if(nibo[j]>='0'&&nibo[j]!='^'&&nibo[j]!='#')//
{
for(i=1;i<=shu->top;i++)
{
if((int)(nibo[j]-'0')==shu->data[i].d2)
{
m=i;
break;
}
}
zhan3[++t3]=shu->data[m].d1;
}
else if(nibo[j]=='+')
{
zhan3[t3-1]=zhan3[t3-1]+zhan3[t3];
t3--;
}
else if(nibo[j]=='-')
{
zhan3[t3-1]=zhan3[t3-1]-zhan3[t3];
t3--;
}
else if(nibo[j]=='*')
{
zhan3[t3-1]=zhan3[t3-1]*zhan3[t3];
t3--;
}
else if(nibo[j]=='/')
{
zhan3[t3-1]=zhan3[t3-1]/zhan3[t3];
t3--;
}
else if(nibo[j]=='^')
{
zhan3[t3-1]=pow(zhan3[t3-1],zhan3[t3]);
t3--;
}
else if(nibo[j]=='#')
{
zhan3[t3]=sqrt(zhan3[t3]);
}
j++;
}
return zhan3[t3];
}
void sizeyunsuan2()
{
char x,a[50];
double jieguo;
int i=0,d;
a[0]='$';
x=getchar();
printf("\n");
printf("该项功能可实现50个以内的数（包括负数和小数）之间的四则运算,其中#表示开平方,^表示乘方\n\n");
printf("例如12^3表示12的3次方,#16表示根号16\n");
printf("请输入表达式：\n");
x=getchar();
while(x!='\n')
{
a[++i]=x;
x=getchar();
}
a[i+1]='\0';
jieguo=jisuan(a);
printf("\n");
printf("结果为:%.3lf",jieguo);
printf("\n\n");
printf("如果您没有得到您想要的数，请检查您输入的式子是否正确\n\n");
printf("继续执行该功能请输1,返回上一目录请输2,清屏输3,退出请输4,以回车结束\n");
scanf("%d",&d);
switch(d)
{
case 1: sizeyunsuan2();
case 2: jiemian();
case 3: system("cls");jiemian();
case 4: exit(0);
}
}
void jinzhi(void)
{
char b[]="0123456789ABCDEF";
long int n,x;
int i=0,j=0,s,a[40];
int c,d;
char str[50];
printf("\n");
printf("欢迎使用进制转换器，本程序可实现2、8、10、16进制之间的互转\n\n");
printf("请输入您将要输入的数的进制数（如2,8,10,16）:");
scanf("%d",&c);
switch(c)
{case 2:
printf("请输入要转换的2进制数正整数 n=");
scanf("%s",str);
n=shu1(str);
break;
case 8:
printf("请输入要转换8进制的正整数 n=");
scanf("%o",&n);break;
case 10:
printf("请输入要转换10进制的正整数 n=");
scanf("%d",&n);break;
case 16:
printf("请输入要转换16进制的正整数 n=");
scanf("%x",&n);break;
}
printf("请输入要转换的数制（如2,8,10,16）,s=");
scanf("%d",&s);x=n;i=0;
printf("转换后的%d进制数为：",s);
while(x>0)
{
a[i]=x%s;x=x/s;i++;
}
while(i>0)
{printf("%c",b[a[i-1]]);i--;}
printf("\n\n");
printf("如果您没有得到您想要的结果，请检查您所输入的数是否已经超过进制限制\n\n");
printf("继续执行该功能请输1，返回上一目录请输2，清屏请输3，退出请输4,以回车结束\n");
scanf("%d",&d);
switch(d)
{
case 1: jinzhi();
case 2: jiemian();
case 3: system("cls");jiemian();
case 4: exit(0);
}
}
int shu1(char str[])
{
int b,c;
int i,a=0;
for(i=0;(c=str[i])!='/0';i++)
{
if (isdigit(c))
{
b=c-'0';
while (isdigit(c=str[++i]))
{b=b*2+c-'0';}
a=1;
}
if(a) {a=0;break;}
