實(shí)驗(yàn)1 詞法分析 一、實(shí)驗(yàn)?zāi)康?通過設(shè)計(jì)調(diào)試詞法分析程序，實(shí)現(xiàn)從源程序中分出各種單詞的方法；加深對(duì)課堂教學(xué)的理解；提高詞法分析方法的實(shí)踐能力。 二、實(shí)驗(yàn)要求 （1）掌握詞法分析的實(shí)現(xiàn)方法。 （2）上機(jī)調(diào)試編出的詞法分析程序。 （3）源程序可以從鍵盤輸入也可以事先存在文件中 （4）將源程序中的各個(gè)單詞讀出后可以顯示在屏幕中也可以存在文件中（包括單詞的類別）三、實(shí)驗(yàn)題目 用 C/C+ 語言編寫以下 C/C+ 子集的詞法分析程序。四、實(shí)驗(yàn)代碼/*測試數(shù)據(jù)BEGINVAR A+,2A,A3,A4:INTEGER;A1:=1,A2:=123,A3:=123-12;WHILE A2=A3 DO A4:=234A*123/45+A1iF A1A2 THEN A1:=A4;ELSE A4:=（A1+A2）*A!;END*/#include#include#includeusing namespace std;int letter(char c)/字母if(c=A & c=0 & c=9)return 1;else return 0;int oper(char c)/運(yùn)算符if(c=+ | c=- | c=* | c=/)return 1;else return 0;int relation(char c)/關(guān)系運(yùn)算符if(c=|c=)return 1;else return 0;int jiefu(char c)/界符if(c=, | c=: | c=;| c=.| c=(| c=)return 1;else return 0;int border(char c)/單詞邊界if(c=, | c=: | c=;| c= | c=. | c=(| c=)| c=+ | c=- | c=* | c=/ | c=| c= )return 1;else return 0;int illegal(char *s)/找非法字符int i,l=strlen(s);for(i=0;il;i+)if(!letter(si) & !digit(si)return 1;return 0;int identifier(char *s)/標(biāo)識(shí)符if(illegal(s)return 0;if( letter(s0) ) return 1;else return 0;int unsigned_word(char *s)/無符號(hào)數(shù)int i,len=strlen(s);for(i=0;ilen;i+)if(!digit(si)return 0;return 1;int r_word(char *s)/保留字if(illegal(s)return 0;else if(!strcmp(s,INTEGER) return 1;else if(!strcmp(s,WHILE) return 1; else if(!strcmp(s,BEGIN) return 1;else if(!strcmp(s,ELSE) return 1;else if(!strcmp(s,VAR) return 1;else if(!strcmp(s,END) return 1;else if(!strcmp(s,IF) return 1;else if(!strcmp(s,DO) return 1;else if(!strcmp(s,THEN) return 1;else return 0;void judge_word(char *s)/判斷單詞int len=strlen(s);if(len=0)return ;if(r_word(s)cout保留字: sendl;else if(identifier(s)cout標(biāo)識(shí)符: sendl;else if(unsigned_word(s)cout無符號(hào)數(shù): sendl;else cout非法單詞: sendl;void main()char s100,word100;while(gets(s)int i,j=0,len=strlen(s);for(i=0;ilen;i+)if(border(si)wordj=0;j=0;judge_word(word);if(si=: & si+1=)cout賦值符：sisi+1 & si+1= | si= & si+1= | si=)cout關(guān)系運(yùn)算符: sisi+1endl;i+;word0=0;continue;else if(relation(si)cout關(guān)系運(yùn)算符: siendl;word0=0;continue;else if(oper(si)cout運(yùn)算符: siendl;word0=0;contin