[T][1]NOIP 2000 计算器的改良

题目背景

NCL是一家专门从事计算器改良与升级的实验室，最近该实验室收到了某公司所委托的一个任务：需要在该公司某型号的计算器上加上解一元一次方程的功能。实验室将这个任务交给了一个刚进入的新手ZL先生。

题目描述

为了很好的完成这个任务，ZL先生首先研究了一些一元一次方程的实例：

4＋3x＝8

6a－5＋1＝2－2a

－5＋12y＝0

ZL先生被主管告之，在计算器上键入的一个一元一次方程中，只包含整数、小写字母及+、-、=这三个数学符号（当然，符号“-”既可作减号，也可作负号）。方程中并没有括号，也没有除号，方程中的字母表示未知数。

你可假设对键入的方程的正确性的判断是由另一个程序员在做，或者说可认为键入的一元一次方程均为合法的，且有唯一实数解。

输入输出格式
输入格式：

一个一元一次方程。

输出格式：

解方程的结果(精确至小数点后三位)。

输入输出样例

输入样例#1：
6a-5+1=2-2a

输出样例#1：
a＝0.750

---

【分析】
字符串的模拟…我可能写复杂了

---

【代码】

//洛谷 P1022 计算器的改良  
#include<cmath>
#include<cstdio>
#include<cstring>
#include<iostream>
#include<algorithm>
#define ll long long
#define M(a) memset(a,0,sizeof a)
#define fo(i,j,k) for(i=j;i<=k;i++)
using namespace std;
const int mxn=1e6;
char s[1000005];
int num[1000005],cun[1000005];
char ch;
bool vis[1000005];
ll kl,kr;  //常数项
ll al,ar;  //系数项 
int main()
{
    int i,j,mid;
    scanf("%s",s+1);
    int len=strlen(s+1);
    fo(i,1,len) if(s[i]<='z' && s[i]>='a') num[++num[0]]=i,ch=s[i];
    fo(i,1,len) if(s[i]=='=') {mid=i;break;}
    fo(i,1,num[0])
    {
        M(cun);int mul=1;
        for(j=num[i]-1;s[j]>='0' && s[j]<='9';j--)
          cun[++cun[0]]=s[j]-'0',vis[j]=1;
        if(s[j]=='-') mul=-1;
        ll tmp=0,po=1;
        fo(j,1,cun[0]) tmp+=po*cun[j],po*=10;
        if(num[i]<mid) al+=tmp*mul;
        else ar+=tmp*mul;
    }
    fo(i,1,len)
      if(!vis[i] && s[i]<='9' && s[i]>='0')
      {
          ll tmp=0;int mul=1;
          if(s[i-1]=='-') mul=-1;
          fo(j,i,len)
          {
              if(s[j]<'0' || s[j]>'9') break;
              vis[j]=1;
              tmp=tmp*10+s[j]-'0';
          }
          if(i<mid) kl+=tmp*mul;
          else kr+=tmp*mul;
      }
    al-=ar,kr-=kl;
    double ans=(double)kr/(double)al;
    printf("%c=%.3lf\n",ch,ans);
    return 0;
}