# -*- coding: cp936 -*-
Keyword = ("begin","end","if","while","var","procedure","else","for","do","int","read","write")
Yunsuanfu = ('+','-','*','/','<','>','%','=')
Fenjiefu = (',',';','(',')','{','}',':')
Kongbai = (' ','\t','\n')
Number = ('0','1','2','3','4','5','6','7','8','9')

test="var a=10;\nvar b,c;\nprocedure p; \n\tbegin\n\t\tc=a+b\n\tend\n"
print test
length=len(test)

for i in range(length):
    if test[i] in Kongbai:
        continue
    if test[i] in Fenjiefu:
        print "分界符\t",test[i]
        continue
    if test[i] in Yunsuanfu:
        print "运算符\t",test[i]
        continue
    if test[i-1] in Number:
        continue
    if test[i] in Number:
        print "数字\t",
        while test[i] in Number:
            print test[i],
            i+=1
        print ''
    if test[i-1] in Number or (test[i-1]>='a' and test[i-1]<='z'):
        continue
    j=0
    temp = ""
    while True:
        if test[i] in Kongbai or test[i] in Yunsuanfu or test[i] in Fenjiefu:
            break
        else:
            j+=1
        i+=1
    temp = test[i-j:i]    
    if temp in Keyword:
        print "关键字\t",temp
    else:
        print "标识符\t",temp