[试题]

试题五
阅读下列程序说明和C代码，将应填入(n)处的字句写在答卷的对应栏内。
(程序5说明)
下列文法可用来描述化学分子式的书写规则(例如，Al2(CO3)3、Cu(OH)2)：
λ→β/βλβ→δ/δn
δ→ξ/ξθ＼(λ)
其中：λ是一个分子式；δ或是一个元素，或是一个带括号的(子)分子式，元素或是一个大写字母(记为ξ)，或是一个大写字母和一个小写字母(记为ξθ)；β或是一个δ，或是在δ之后接上一个整数n，δn表示β有n个δ的元素或(子)分子式。一个完整的分子式由若干个β组成。
当然一个正确的分子式除符合上述文法规则外，还应满足分子式本身的语义要求。
下面的程序输入分子式，按上述文法分析分子式，并计算出该分子式的分子量。例如：元素H的原子量是1，元素O的原子量是16。输入分子式H2O，程序计算出它的分子量为18(1×2+16)。程序中各元素的名及它的原子量从文件atom.dat中读入。
(程序5)
#include<stdio.h>
#include<string.h>
#define MAXN 300
#define GMLEN 30
struct elem{char name［］;/元素名/
doublev；/原子量/
}nTbl［MAXN］；
char cmStr［GMLEN］，pos;
int c;FILEfp;
double factor();
double atom()/处理文法符号δ/
{char w［3］;int i;double num;
while((c=pos++)==′||c==′＼t′);/略过空白字符/
if(c==′＼n′)return 0.0;
if(c>=′A′ && C<=′Z′){/将元素名存入W/
w［i=0］=c;c=pos++;
if(c>=′a ′&& c<=′z′)w［++i］=c;else pos--;
w［++i］=′＼0′;
for(i=0；nTbl［i］.v>0.0;i++)
if(strcmp(w，nTb［i］.name)==0)returnnTbl［i］.v；
printf("＼n元素表中没有所输入的元素：＼t%s＼n",w);retur n-1.0;
}elseif(c==′(′){
if((num= (1) )<0.0)return-1.0;/包括可能为空的情况/
if(pos++!=′)′){printf("分子式中括号不匹配！/n")；return-1.0；}
returnnum;
}
printf("分子式中存在非法字符：＼t%c＼n",c)；
return-1.0;
}
double mAtom()/处理文法符号β/
{double num;int n=1;
if((num= (2) )<0.0)return-1.0;
c=pos++；
if(c>=′0′&&c<=′9′){
n=0;while(c>=0&&c<=′9′)
{n= (3) ；
c=poss++;
}
}
pos--;
return numn;
}
double factor()/处理文法符号λ/
{double num=0.0,d;
if((num=mAtom())<0.0)return-1.0;
while(pos>=′A′&&pos<=′Z′||pos==′(′){
if((d= (4) )<0.0)return-1.0；(5) ；
}return num；
}
void main()
{char fname［］="atom.dat";/元素名及其原子量文件/
int i;double num；
if((fp=fopen(fname,"r"))==NULL){/以读方式打开正文文件/
printf("Can not open%s file.＼n",fname);return/程序非正常结束/
}
i=0；
while(i<MAXN&&fscanf(fp,"%s%lf",bTbl［i］.name,&nTbl［i］.v)==2)
i++;
fclose(fp);nTbl［i］.v=-1.0;
while (1) {/输入分子式和计算分子量循环，直至输入空行结束/
printf("＼n输入分子式！(空行结束)＼n");gets(cmStr);
pos=cmStr;
if(cmStr［0］==′＼0′)break；
if((num=fator())>0.0)
if(pos!=′＼0′)printf("分子式不完整！＼n")；
else printf("分子式的分子量为%f＼n",num)；
}
}