1. 程序 
character*(*) name 
name=’apple’ 
L=len(name) 
Do 10 I = 1, L 
10 name(I:I) = char(Ichar(name(I:I))+I 
print*, name 
end 
程序运行后输出结果为( ) 
A．APPLE
B．brspj
C．jpsrb
D．apple。 
2. 1993年颁发了《中华人民共和国产品质量法》, 对建设工程来说下述何项正确? 
A．从此有了工程质量方面的法律; 
B．是不适用的, 需另行制订工程建设质量法规; 
C．先试行, 以后再补充规定; 
D．它是一个指导性法律, 据此参照制订相应的工程质量法规。 
答案：1. B 2. B
（岩土工程师）