一：词法分析程序的功能：
输入单词串，以‘begin‘开始，以‘#‘结束。如果是文法正确的句子，则输出成功的信息：‘输入单词串成功‘，否则返回错误提示。
例：
输入 begin a:=345 end #
输出 输入单词串成功
二：符号与种码对照表
|
单词符号 |
种别码 |
单词符号 |
种别码 |
|
begin |
1 |
: |
17 |
|
if |
2 |
:= |
18 |
|
then |
3 |
< |
20 |
|
while |
4 |
<= |
21 |
|
do |
5 |
<> |
22 |
|
end |
6 |
> |
23 |
|
l(l|d)* |
10 |
>= |
24 |
|
dd* |
11 |
= |
25 |
|
+ |
13 |
; |
26 |
|
- |
14 |
( |
27 |
|
* |
15 |
) |
28 |
|
/ |
16 |
# |
0 |
三：程序代码以及运行结果
代码：
#include "stdio.h"
#include "string.h"
char prog[100],token[8],ch;
char *rwtab[6]={"begin","if","then","while","do","end"};
int syn,p,m,n,sum;
int kk;
void factor(void);
void expression(void);
void yucu(void);
void term(void);
void statement(void);
void lrparser(void);
void scaner(void);
int main(void)
{
p=kk=0;
printf("\n请输入一段以‘begin‘开头，以‘#‘结束的单词串: \n");
do
{
scanf("%c",&ch);
prog[p++]=ch;
}while(ch!=‘#‘);
p=0;
scaner();
lrparser();
//getch();
}
void lrparser(void)
{
if(syn==1)
{
scaner(); /*读下一个单词符号*/
yucu(); /*调用yucu()函数；*/
if(syn==6)
{
scaner();
if((syn==0)&&(kk==0))
printf("输入单词串成功!\n");
}
else
{
if(kk!=1) printf("单词串没有以‘#‘作为结束!\n");
kk=1;
}
}
else
{
printf("单词串没有以‘begin‘为开头!\n");
kk=1;
}
return;
}
void yucu(void)
{
statement(); /*调用函数statement();*/
while(syn==26)
{
scaner(); /*读下一个单词符号*/
if(syn!=6)
statement(); /*调用函数statement();*/
}
return;
}
void statement(void)
{
if(syn==10)
{
scaner(); /*读下一个单词符号*/
if(syn==18)
{
scaner(); /*读下一个单词符号*/
expression(); /*调用函数statement();*/
}
else
{
printf("单词串 ‘:=‘ 表达错误!\n");
kk=1;
}
}
else
{
printf("没有效的单词串!\n");
kk=1;
}
return;
}
void expression(void)
{
term();
while((syn==13)||(syn==14))
{
scaner(); /*读下一个单词符号*/
term(); /*调用函数term();*/
}
return;
}
void term(void)
{
factor();
while((syn==15)||(syn==16))
{
scaner(); /*读下一个单词符号*/
factor(); /*调用函数factor(); */
}
return;
}
void factor(void)
{
if((syn==10)||(syn==11))
{
scaner();
}
else if(syn==27)
{
scaner(); /*读下一个单词符号*/
expression(); /*调用函数statement();*/
if(syn==28)
{
scaner(); /*读下一个单词符号*/
}
else
{
printf("错误 ‘(‘\n");
kk=1;
}
}
else
{
printf("单词串有错!\n");
kk=1;
}
return;
}
void scaner(void)
{
sum=0;
for(m=0;m<8;m++)
token[m++]=NULL;
m=0;
ch=prog[p++];
while(ch==‘ ‘)
ch=prog[p++];
if(((ch<=‘z‘)&&(ch>=‘a‘))||((ch<=‘Z‘)&&(ch>=‘A‘)))
{
while(((ch<=‘z‘)&&(ch>=‘a‘))||((ch<=‘Z‘)&&(ch>=‘A‘))||((ch>=‘0‘)&&(ch<=‘9‘)))
{
token[m++]=ch;
ch=prog[p++];
}
p--;
syn=10;
token[m++]=‘\0‘;
for(n=0;n<6;n++)
if(strcmp(token,rwtab[n])==0)
{
syn=n+1;
break;
}
}
else if((ch>=‘0‘)&&(ch<=‘9‘))
{
while((ch>=‘0‘)&&(ch<=‘9‘))
{
sum=sum*10+ch-‘0‘;
ch=prog[p++];
}
p--;
syn=11;
}
else
switch(ch)
{
case ‘<‘:
m=0;
ch=prog[p++];
if(ch==‘>‘)
{
syn=21;
}
else if(ch==‘=‘)
{
syn=22;
}
else
{
syn=20;
p--;
}
break;
case ‘>‘:
m=0;
ch=prog[p++];
if(ch==‘=‘)
{
syn=24;
}
else
{
syn=23;
p--;
}
break;
case ‘:‘:
m=0;
ch=prog[p++];
if(ch==‘=‘)
{
syn=18;
}
else
{
syn=17;
p--;
}
break;
case ‘+‘:
syn=13;
break;
case ‘-‘:
syn=14;
break;
case ‘*‘:
syn=15;
break;
case ‘/‘:
syn=16;
break;
case ‘(‘:
syn=27;
break;
case ‘)‘:
syn=28;
break;
case ‘=‘:
syn=25;
break;
case ‘;‘:
syn=26;
break;
case ‘#‘:
syn=0;
break;
default:
syn=-1;
break;
}
}
运行结果截图：
