科学计算器代码

top=OPRT[tb-1];
if(!tb)
{
if(n->opt=='='||n->opt==')')
{
if(n->opt==')')
*输入：表达式链的地址
*输出：执行状态，正确返回1,错误返回0
*/
int input(Node *in)
{
//input->string
char ins[INPUT_MAX]={0};
int insi=0;
char temp_in=0;
int len=0;
int calculate(Node *n,double *r);
int sclt(int opr,double *opd);
int dclt(int opr,double *opd1,double opd2);
int prid(int c);
/*功能：表达式输入和转换
* 接收输入并翻译为操作符和操作数存入表达式链
int fu_int[NUM_OPT]={'+','-','*','/','^','(',')','s','c','t','s'+'a','c'+'a','t'+'a','n','g','='};
int i=0;
for(i=0;i<num_opt;i++) 0="" a="0.0,b=0.0;" char="" const="" db="0;" dd="(char*)d;" double="" i="=NUM_OPT)" int="" len="0;" n-="" nb="n;" node="" o="0;" return="" tb="0;" top="0;">tp==Opt&&n->opt=='-')
}while((p[i]>='0'&&p[i]<='9')||p[i]=='.');
if(p[i]==' ')
i++;
*len=i;
return temp;
}
/*功能：翻译操作数
* 如果运算符非法，则返回0，合法则返回非零标志
db--;
a=OPRD[db];
tb--;
o=OPRT[tb];
if(sclt(o,&a))
*/
int translateopt(char *p,int *len)
{
char fu[NUM_OPT][LEN_OPT]={"+","-","*","/","^","(",")","sin","cos","tan","asin","acos","atan","ln","lg","="};
}
else
{
//双目运算符
if(prid(n->opt))
{
//if(!GetTop(OPRT,&top))
if(tb)
//检测开头的空格
while(' '==(ins[0]=getchar()));
//检测是不是直接输入了一个回车
if(ins[0]!='\n'
{
do{
temp_in=getchar();
//只能忽略多余空格
if(translate(ins+insi,in++,&len))
insi+=len;
else
return 0;
}
//自动添加等号
if((in-1)->opt!='=')
OPRD[db]=0.0,db++; //Push(&OPRD,0.0);
while(1)
{
//判断前面有没有负号
if(n->tp==Opd)
{
OPRD[db]=n->opd,db++,n++; //Push(&OPRD,n->opd),n++;
in->opt='=',in->tp=Opt,in++;
in->opt=-1,in->tp=Opt;
return 1;
}
/*功能：翻译字符串为操作数或操作符
*输入：字符串地址，翻译返回节点，操作数和操作符长度返回地址
*输出：翻译结果状态
*/
int translate(char *p,Node *re,int *len)
if(ins[insi]==' '&&temp_in==' ')
continue;
ins[++insi]=temp_in;
}while(temp_in!='\n');
ins[insi]=0;
{
OPRD[db]=a,db++; //Push(&OPRD,a);
continue;
}
else
temp=temp*10+p[i++]-'0';
else if(!flag&&p[i]=='.')
flag=1,i++;
else
temp+=(p[i++]-'0')*pow(0.1,pointnum),pointnum++;
typedef enum{
Opd=0,
Opt=1
}Type;
typedef struct{
int opt;
double opd;
Type tp;
}Node;
//括号栈，检测括号是否匹配
char brackets[NUM_OPS];
int bb=0;
return 0;
}
if(prid(top)>=prid(n->opt))
int input(Node *in);
int translate(char *p,Node *re,int *len);
double translateopd(char *p,int *len);
int translateopt(char *p,int *len);
int cmp(const char *s,const char *d);
*len=2;
if(p[2]==' ')
(*len)++;
return 1;
}
else
return 0;
{
if(*p>='0'&&*p<='9')
{
re->tp=Opd;
re->opd=translateopd(p,len);
return 1;
}
else if(*p=='e'||*p=='p')
{
#include <stdio.h>
#include <stdlib.h>
#include <math.h>
#define INPUT_MAX 1000
#define NODE_MAX 500
#define NUM_OPT 20
#define LEN_OPT 6
#define NUM_OPS 200
return 1;
}
else
{
if(p[1]=='i')
{
re->tp=Opd;
re->opd=M_PI;
break;
}
else
OPRT[tb]=n->opt,tb++,n++; //Push(&OPRT,n->opt),n++;
}
}
else
{
re->tp=Opt;
re->opt=translateopt(p,len);
if(re->opt)
return 1;
else
return 0;
continue;
}
if(prid(top)==0)