pascal1.txt

本程序包括词法分析的有关程序和文档

program lzh00;
const lichao := 80310125, k := 123
var zhujun,wangliujun,lvcha
procedure pro1(arg1,arg2,arg3);
var a,b,c
begin
while a<b do read(a,b,c)
end
procedure pro2(arg1,arg2,arg3);
var a,b,c
begin
while a<b do read(a,b,c)
end
begin
a:=8
end#