3、><0,data><+,-><1,92><>,-><3,3f><0,data><=,><0,data><+,-><2,1><;,-><0,data><=,-><0,data><-,-><2,-><;,->【实验代码】#include#includeusingnamespacestd;#defineMAX5charch='';stringkey[5]={"if","then","else","while","do"};intIskey(str
4、ingc){//关键字判断inti;for(i=0;i='a'))
5、
6、((c<='Z')&&(c>='A')))return1;elsereturn0;}intIsLetter1(charc){//判断是否为a~f字母if(((c<='f')&&(c>='a'))
7、
8、((c<='F')&&(c>='A')))retu
9、rn1;elsereturn0;}intIsDigit(charc){//判断是否为数字if(c>='0'&&c<='9')return1;elsereturn0;}voidscan(FILE*fpin){stringarr="";while((ch=fgetc(fpin))!=EOF){arr="";if(ch==''
10、
11、ch=='t'
12、
13、ch==''){}elseif(IsLetter(ch)
14、
15、ch=='_'){arr=arr+ch;ch=fgetc(fpin);while(IsLetter(c
16、h)
17、
18、IsDigit(ch)){if((ch<='Z')&&(ch>='A'))ch=ch+32;arr=arr+ch;ch=fgetc(fpin);}fseek(fpin,-1L,SEEK_CUR);if(Iskey(arr)){cout<='0'&
19、&ch<='7'){while(ch>='0'&&ch<='7'){flag=1;arr=arr+ch;ch=fgetc(fpin);}}elseif(ch=='x'
20、
21、ch=='X'){flag=2;arr=arr+ch;ch=fgetc(fpin);while(IsDigit(ch)
22、
23、IsLetter1(ch)){arr=arr+ch;ch=fgetc(fpin);}}elseif(ch==''
24、
25、ch==','
26、
27、ch==';'){cout<28、pin,-1L,SEEK_CUR);if(flag==1)cout<