识符"<<endl;}elseif(IsDigit(ch)){while(IsDigit(ch)||ch=='.'&&IsDigit(fgetc(fpin))){arr=arr+ch;ch=fgetc(fpin);}fseek(fpin,-1L,SEEK_CUR);cout<<arr<<"\t$无符号实数"<<endl;}elseswitch(ch){//标识符分类识别case'+':case'-':case'*':case'/':cout<<ch<<"\t$运算符"<<endl;break;case'=':case'(':case')':case'[':case']':case'{':case'}':cout<<ch<<"\t$界符"<<endl;break;case';':case',':case':':{ch=fgetc(fpin);if(ch=='=')cout<<":="<<"\t$运算符"<<endl;else{cout<<"="<<"\t$运算符"<<endl;;fseek(fpin,-1L,SEEK_CUR);}}break;case'.':case'<':{ch=fgetc(fpin);if(ch=='=')cout<<"<="<<"\t$运算符"<<endl;elseif(ch=='<')cout<<"<<"<<"\t$输出控制符"<<endl;elseif(ch=='>')cout<<"<>"<<"\t$运算符"<<endl;else{cout<<"<"<<"\t$运算符"<<endl;fseek(fpin,-1L,SEEK_CUR);}}break;case'>':{ch=fgetc(fpin);if(ch=='=')cout<<">="<<"\t$运算符"<<endl;if(ch=='>')cout<<">>"<<"\t$输入控制符"<<endl;