[其它问题] 帮个忙

7702 6
极限 2010-5-18 13:52:52 | 显示全部楼层 |阅读模式
有那位哥会用C写一个计算器的程序,能简单的多项式的加减乘除就可以了!十分感谢!![s:2]
这种东西网上一搜一大把……

这是简单点的:
#include<stdio.h>
#include<math.h>
#include<malloc.h>

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!='\\0')
{
  if(a>='0'&&a<='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=='(')
  {
   zhan2[++t2]=a;
   i++;
  }
  else if(a==')')
  {
   j=t2;
   while(zhan2[j]!='(')
   {
    nibo[++t1]=zhan2[j];
    nibo[t1+1]='\\0';
    j--;
   }
   t2=j-1;
   i++;
  }
  else if(a=='+')
  {
   while(t2>0&&zhan2[t2]!='(')
   {
    nibo[++t1]=zhan2[t2];
    nibo[t1+1]='\\0';
    t2--;
   }
   zhan2[++t2]=a;
   i++;
  }
  else if(a=='-')
  {
   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++;
   }
  }
  else if(a=='*'||a=='/')
  {
   while(zhan2[t2]=='*'||zhan2[t2]=='/'||zhan2[t2]=='^'||zhan2[t2]=='#')
   {
    nibo[++t1]=zhan2[t2];
    nibo[t1+1]='\\0';
    t2--;
   }
   zhan2[++t2]=a;
   i++;
  }
  else if(a=='^'||a=='#')
  {
   while(zhan2[t2]=='^'||zhan2[t2]=='#')
   {
    nibo[++t1]=zhan2[t2];
    nibo[t1+1]='\\0';
    t2--;
   }
   zhan2[++t2]=a;
   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.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 main()
{
for(;;)
{
char x,a[50];
double jieguo;
int i=0;
a[0]='$';
printf("#表示开方,^表示乘方(支持负数)\\n");
    printf("请输入表达式,退出请输入q:\\n\\n");
    scanf("%c",&x);
if(x=='q') break;
while(x!='\\n')
{
  a[++i]=x;
  scanf("%c",&x);
}
a[i+1]='\\0';
jieguo=jisuan(a);
    printf("\\n");
    printf("结果为:%lf",jieguo);
printf("\\n\\n\\n\\n\\n");
}
}


稍微复杂点的:
#include <dos.h>    /*DOS接口函数*/
#include <math.h>    /*数学函数的定义*/
#include <conio.h>   /*屏幕操作函数*/
#include <stdio.h>   /*I/O函数*/
#include <stdlib.h>   /*库函数*/
#include <stdarg.h>   /*变量长度参数表*/
#include <graphics.h>   /*图形函数*/
#include <string.h>   /*字符串函数*/
#include <ctype.h>   /*字符操作函数*/
#define UP 0x48     /*光标上移键*/
#define DOWN 0x50   /*光标下移键*/
#define LEFT 0x4b   /*光标左移键*/
#define RIGHT 0x4d   /*光标右移键*/
#define ENTER 0x0d   /*回车键*/
void *rar;        /*全局变量,保存光标图象*/
struct palettetype palette; /*使用调色板信息*/
int   GraphDriver; /* 图形设备驱动*/
int   GraphMode; /* 图形模式值*/
int   ErrorCode;   /* 错误代码*/
int   MaxColors;   /* 可用颜色的最大数值*/
int   MaxX, MaxY; /* 屏幕的最大分辨率*/
double   AspectRatio; /* 屏幕的像素比*/
void drawboder(void); /*画边框函数*/
void initialize(void);   /*初始化函数*/
void computer(void);   /*计算器计算函数*/
void changetextstyle(int font, int direction, int charsize);   /*改变文本样式函数*/
void mwindow(char *header);   /*窗口函数*/
int specialkey(void) ;    /*获取特殊键函数*/
int arrow();      /*设置箭头光标函数*/
/*主函数*/
int main()
{
    initialize();/* 设置系统进入图形模式 */
    computer(); /*运行计算器 */
    closegraph();/*系统关闭图形模式返回文本模式*/
    return(0);    /*结束程序*/
}
/* 设置系统进入图形模式 */
void initialize(void)
{
    int xasp, yasp; /* 用于读x和y方向纵横比*/
    GraphDriver = DETECT; /* 自动检测显示器*/
    initgraph( &GraphDriver, &GraphMode, "" );
/*初始化图形系统*/
    ErrorCode = graphresult();   /*读初始化结果*/
    if( ErrorCode != grOk )   /*如果初始化时出现错误*/
    {
       printf("Graphics System Error: %s\\n",
       grapherrormsg( ErrorCode ) ); /*显示错误代码*/
       exit( 1 );   /*退出*/
     }
     getpalette( &palette );   /* 读面板信息*/
     MaxColors = getmaxcolor() + 1; /* 读取颜色的最大值*/
     MaxX = getmaxx();     /* 读屏幕尺寸 */
     MaxY = getmaxy();   /* 读屏幕尺寸 */
     getaspectratio( &xasp, &yasp ); /* 拷贝纵横比到变量中*/
     AspectRatio = (double)xasp/(double)yasp;/* 计算纵横比值*/
}
/*计算器函数*/
void computer(void)
{
     struct viewporttype vp;   /*定义视口类型变量*/
     int color, height, width;
     int x, y,x0,y0, i, j,v,m,n,act,flag=1;
     float num1=0,num2=0,result;   /*操作数和计算结果变量*/
     char cnum[5],str2[20]={""},c,temp[20]={""};
     char str1[]="1230.456+-789*/Qc=^%";/* 定义字符串在按钮图形上显示的符号 */
     mwindow( "Calculator" );   /* 显示主窗口 */
     color = 7;      /*设置灰颜色值*/
     getviewsettings( &vp );     /* 读取当前窗口的大小*/
     width=(vp.right+1)/10;     /* 设置按钮宽度   */
     height=(vp.bottom-10)/10 ;   /*设置按钮高度   */
     x = width /2;    /*设置x的坐标值*/
     y = height/2; /*设置y的坐标值*/
     setfillstyle(SOLID_FILL, color+3);
     bar( x+width*2, y, x+7*width, y+height );
     /*画一个二维矩形条显示运算数和结果*/
     setcolor( color+3 );   /*设置淡绿颜色边框线*/
     rectangle( x+width*2, y, x+7*width, y+height );
      /*画一个矩形边框线*/
     setcolor(RED);   /*设置颜色为红色*/
     outtextxy(x+3*width,y+height/2,"0."); /*输出字符串"0."*/
     x =2*width-width/2;    /*设置x的坐标值*/
     y =2*height+height/2;   /*设置y的坐标值*/
     for( j=0 ; j<4 ; ++j ) /*画按钮*/
     {
        for( i=0 ; i<5 ; ++i )
        {
            setfillstyle(SOLID_FILL, color);
            setcolor(RED);
            bar( x, y, x+width, y+height ); /*画一个矩形条*/
            rectangle( x, y, x+width, y+height );
            sprintf(str2,"%c",str1[j*5+i]);
              /*将字符保存到str2中*/
            outtextxy( x+(width/2), y+height/2, str2);
            x =x+width+ (width / 2) ; /*移动列坐标*/
        }
        y +=(height/2)*3; /* 移动行坐标*/
        x =2*width-width/2;   /*复位列坐标*/
     }
     x0=2*width;
     y0=3*height;
     x=x0;
     y=y0;
     gotoxy(x,y); /*移动光标到x,y位置*/
     arrow();   /*显示光标*/
     putimage(x,y,rar,XOR_PUT);
     m=0;
     n=0;
     strcpy(str2,"");   /*设置str2为空串*/
     while((v=specialkey())!=45)   /*当压下Alt+x键结束程序,否则执行下面的循环*/
     {
        while((v=specialkey())!=ENTER)   /*当压下键不是回车时*/
        {
    putimage(x,y,rar,XOR_PUT); /*显示光标图象*/
    if(v==RIGHT)    /*右移箭头时新位置计算*/
       if(x>=x0+6*width)
                  /*如果右移,移到尾,则移动到最左边字符位置*/
       {
    x=x0;
    m=0;
        }
       else
       {
    x=x+width+width/2;
    m++;
        } /*否则,右移到下一个字符位置*/
    if(v==LEFT) /*左移箭头时新位置计算*/
       if(x<=x0)
       {
    x=x0+6*width;
    m=4;
       } /*如果移到头,再左移,则移动到最右边字符位置*/
       else
       {
   x=x-width-width/2;
   m--;
       } /*否则,左移到前一个字符位置*/
           if(v==UP) /*上移箭头时新位置计算*/
       if(y<=y0)
       {
   y=y0+4*height+height/2;
   n=3;
       } /*如果移到头,再上移,则移动到最下边字符位置*/
       else
       {
                 y=y-height-height/2;
                 n--;
              } /*否则,移到上边一个字符位置*/
    if(v==DOWN) /*下移箭头时新位置计算*/
       if(y>=7*height)
       {
   y=y0;
                 n=0;
       } /*如果移到尾,再下移,则移动到最上边字符位置*/
       else
       {
   y=y+height+height/2;
   n++;
       } /*否则,移到下边一个字符位置*/
           putimage(x,y,rar,XOR_PUT);   /*在新的位置显示光标箭头*/
       }
       c=str1[n*5+m];   /*将字符保存到变量c中*/
       if(isdigit(c)||c=='.')   /*判断是否是数字或小数点*/
       {
    if(flag==-1)   /*如果标志为-1,表明为负数*/
           {
              strcpy(str2,"-"); /*将负号连接到字符串中*/
              flag=1;
           } /*将标志值恢复为1*/
       sprintf(temp,"%c",c); /*将字符保存到字符串变量temp中*/
       strcat(str2,temp); /*将temp中的字符串连接到str2中*/
       setfillstyle(SOLID_FILL,color+3);
       bar(2*width+width/2,height/2,15*width/2,3*height/2);
       outtextxy(5*width,height,str2);   /*显示字符串*/
    }
    if(c=='+')
    {
       num1=atof(str2);   /*将第一个操作数转换为浮点数*/
       strcpy(str2,""); /*将str2清空*/
       act=1;   /*做计算加法标志值*/
       setfillstyle(SOLID_FILL,color+3);
       bar(2*width+width/2,height/2,15*width/2,3*height/2);
       outtextxy(5*width,height,"0."); /*显示字符串*/
    }
    if(c=='-')
    {
       if(strcmp(str2,"")==0) /*如果str2为空,说明是负号,而不是减号*/
    flag=-1;   /*设置负数标志*/
       else
       {
    num1=atof(str2);   /*将第二个操作数转换为浮点数*/
    strcpy(str2,""); /*将str2清空*/
    act=2; /*做计算减法标志值*/
    setfillstyle(SOLID_FILL,color+3);
    bar(2*width+width/2,height/2,15*width/2,3*height/2); /*画矩形*/
    outtextxy(5*width,height,"0."); /*显示字符串*/
       }
    }
    if(c=='*')
    {
       num1=atof(str2); /*将第二个操作数转换为浮点数*/
       strcpy(str2,""); /*将str2清空*/
       act=3; /*做计算乘法标志值*/
       setfillstyle(SOLID_FILL,color+3);
       bar(2*width+width/2,height/2,15*width/2,3*height/2);
       outtextxy(5*width,height,"0."); /*显示字符串*/
     }
    if(c=='/')
    {
       num1=atof(str2); /*将第二个操作数转换为浮点数*/
       strcpy(str2,""); /*将str2清空*/
       act=4; /*做计算除法标志值*/
       setfillstyle(SOLID_FILL,color+3);
       bar(2*width+width/2,height/2,15*width/2,3*height/2);
       outtextxy(5*width,height,"0."); /*显示字符串*/
    }
    if(c=='^')
    {
       num1=atof(str2); /*将第二个操作数转换为浮点数*/
       strcpy(str2,""); /*将str2清空*/
       act=5; /*做计算乘方标志值*/
       setfillstyle(SOLID_FILL,color+3); /*设置用淡绿色实体填充*/
       bar(2*width+width/2,height/2,15*width/2,3*height/2); /*画矩形*/
       outtextxy(5*width,height,"0."); /*显示字符串*/
    }
    if(c=='%')
    {
       num1=atof(str2); /*将第二个操作数转换为浮点数*/
       strcpy(str2,"");   /*将str2清空*/
       act=6; /*做计算模运算乘方标志值*/
       setfillstyle(SOLID_FILL,color+3); /*设置用淡绿色实体填充*/
       bar(2*width+width/2,height/2,15*width/2,3*height/2); /*画矩形*/
       outtextxy(5*width,height,"0."); /*显示字符串*/
    }
    if(c=='=')
    {
       num2=atof(str2); /*将第二个操作数转换为浮点数*/
       switch(act)   /*根据运算符号计算*/
       {
    case 1:result=num1+num2;break; /*做加法*/
    case 2:result=num1-num2;break; /*做减法*/
    case 3:result=num1*num2;break; /*做乘法*/
    case 4:result=num1/num2;break; /*做除法*/
    case 5:result=pow(num1,num2);break; /*做x的y次方*/
    case 6:result=fmod(num1,num2);break; /*做模运算*/
       }
       setfillstyle(SOLID_FILL,color+3); /*设置用淡绿色实体填充*/
       bar(2*width+width/2,height/2,15*width/2,3*height/2); /*覆盖结果区*/
       sprintf(temp,"%f",result); /*将结果保存到temp中*/
       outtextxy(5*width,height,temp); /*显示结果*/
    }
    if(c=='c')
    {
       num1=0; /*将两个操作数复位0,符号标志为1*/
       num2=0;
       flag=1;
       strcpy(str2,""); /*将str2清空*/
       setfillstyle(SOLID_FILL,color+3);   /*设置用淡绿色实体填充*/
       bar(2*width+width/2,height/2,15*width/2,3*height/2); /*覆盖结果区*/
       outtextxy(5*width,height,"0."); /*显示字符串*/
    }
    if(c=='Q')exit(0);   /*如果选择了q回车,结束计算程序*/
    }
    putimage(x,y,rar,XOR_PUT); /*在退出之前消去光标箭头*/
    return;   /*返回*/
}
/*窗口函数*/
void mwindow( char *header )
{
    int height;
    cleardevice();    /* 清除图形屏幕 */
    setcolor( MaxColors - 1 );   /* 设置当前颜色为白色*/
    setviewport( 20, 20, MaxX/2, MaxY/2, 1 ); /* 设置视口大小 */
    height = textheight( "H" );            /* 读取基本文本大小   */
    settextstyle( DEFAULT_FONT, HORIZ_DIR, 1 );/*设置文本样式*/
    settextjustify( CENTER_TEXT, TOP_TEXT );/*设置字符排列方式*/
    outtextxy( MaxX/4, 2, header );   /*输出标题*/
    setviewport( 20,20+height+4, MaxX/2+4, MaxY/2+20, 1 );   /*设置视口大小*/
    drawboder(); /*画边框*/
}
void drawboder(void)   /*画边框*/
{
    struct viewporttype vp;   /*定义视口类型变量*/
    setcolor( MaxColors - 1 );   /*设置当前颜色为白色 */
    setlinestyle( SOLID_LINE, 0, NORM_WIDTH );/*设置画线方式*/
    getviewsettings( &vp );/*将当前视口信息装入vp所指的结构中*/
    rectangle( 0, 0, vp.right-vp.left, vp.bottom-vp.top ); /*画矩形边框*/
}
/*设计鼠标图形函数*/
int arrow()
{
    int size;
    int raw[]={4,4,4,8,6,8,14,16,16,16,8,6,8,4,4,4}; /*定义多边形坐标*/
    setfillstyle(SOLID_FILL,2); /*设置填充模式*/
    fillpoly(8,raw);     /*画出一光标箭头*/
    size=imagesize(4,4,16,16);   /*测试图象大小*/
    rar=malloc(size);   /*分配内存区域*/
    getimage(4,4,16,16,rar); /*存放光标箭头图象*/
    putimage(4,4,rar,XOR_PUT); /*消去光标箭头图象*/
    return 0;
}
/*按键函数*/
int specialkey(void)
{
    int key;
    while(bioskey(1)==0);   /*等待键盘输入*/
    key=bioskey(0);    /*键盘输入*/
    key=key&0xff? key&0xff:key>>8;   /*只取特殊键的扫描值,其余为0*/
    return(key);     /*返回键值*/
}
雪域狼 2010-5-19 07:31:24 | 显示全部楼层
让别人帮你写有什么用,求人不如求自己,我那QQ43120279里面有C语言的学习教程,有时间去看看吧!
sunrise 2010-5-19 09:18:34 | 显示全部楼层
我来晚了。。。VB的要不?
极限 2010-5-19 22:53:46 | 显示全部楼层

回 3楼(sunrise) 的帖子

谢谢了,我现在C都没搞太明白,VB的就算了吧,不过还是谢谢了!
极限 2010-5-19 22:56:16 | 显示全部楼层

回 2楼(雪域狼) 的帖子

呵呵,我在学C,只是具体怎么编程还不会,哎,时间紧。
极限 2010-5-19 22:57:20 | 显示全部楼层

回 1楼(HUC-冷无崖) 的帖子

太辛苦你了,谢谢。参考一下,。
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

中国红客联盟公众号

联系站长QQ:5520533

admin@chnhonker.com
Copyright © 2001-2026 Discuz Team. Powered by Discuz! X3.5 ( 粤ICP备13060014号 )|天天打卡 本站已运行