他发现了最早的“中国”

——记何驽博士

    山西省临汾市襄汾县陶寺遗址连续发掘出土了陶寺早、中期城址，宫殿区核心建筑，墓葬区出土了精美的玉器、彩绘陶器等随葬品，以及以观象授时为主并兼有祭祀功能的观象台。文物考古专家进一步考证，证实襄汾县陶寺遗址极可能就是4000多年前尧时代的“唐尧帝都”。完成这一艰巨而神圣任务的是中国社会科学院考古研究所山西队队长、陶寺城址发掘领队何驽博士和他的队员们。

    何驽博士上中学时就喜欢语文、英语和历史，特别是对文物考古一直很感兴趣。1981年，他义无反顾地选择考古专业，考入了北京大学考古系。2001年7月提前完成博士研究生学业的他，毕业后被分配到中国社会科学院考古研究所工作。但他更愿意到考古一线。后来，他主动要求下基层。在湖北荆州工作期间，他撰写了《中国文明起源考古研究思考点滴》等50余篇有价值的论文。他常给同事们讲:“‘纸上得来终觉浅，绝知此事要躬行。’要想印证较大和深奥的理论，就必须到考古实践中去，掌握大量的考古实证，只有到都城遗址去考古，才能发现更有价值的东西。”

    野外工作条件一般都是比较艰苦的，但这些对何驽来说似乎已经习惯了。他说:“在野外工作，我不奢求什么，只要晚上有个住的地方，白天有个一日三餐就足够了。”他在陶寺一住就是四个春秋。作为领队，他经常带着队员日出而作，日落而息。他总是白天在田野里搞发掘，晚上在灯下读书、思考、写论文，经常熬到夜里十一二点。四年中，他撰写了40多篇有一定影响力的论文，引起了学术界的高度重视。

    何驽的发现，为唐尧时代在天文历法上的贡献进一步提供了佐证。因为没有这一发掘，尧舜禹时代只能是神话传说，而何驽所做的一切，等于为印证陶寺遗址成为“唐尧帝都”提供了确凿的历史证据，这就让神话传说与考古结论相吻合，使“文明始祖”尧在中华文明的历史上具有了更加独特而重要的地位。

    何驽在事业上是成功的，也是令人叹服的。但谈起四年多的陶寺考古历程，他总是感慨万千。2002年，陶寺被纳入中华文明探源工程与研究项目，而他就是这个项目重点——陶寺遗址的牵头人，具体挖掘工作从哪里下手，大家都在看领队。他深感自己肩上责任的重大，但工作能不能取得实质性进展，他心里当时几乎没有谱。他知道应该相信文献，但也绝不能拘泥于现有的东西而裹足不前。他认为，考古工作既要有大胆的设想，又要有科学的态度。他从小就养成了明知山有虎，偏向虎山行的倔强性格，遇到事情总爱刨根问底。何驽和队员们在陶寺遗址发现了一个建筑遗址，猜测该建筑可能用于观测日出。冬至时，考古队员冯九生专门来到建筑遗址现场进行观测，结果发现日出时，太阳并不在观测缝中，于是陷入茫然。何驽认为很可能是观测点位置有偏差，该建筑应该是有观测冬至功能的。何驽的观点一时在考古界引起了轩然大波，当时各种说法不一，质疑声如潮水般涌来:“何驽所提到的观测缝，是不是有意识做出来的?”“目前学术界很浮躁，想搞点轰动效应的人太多，何驽莫非是想制造爆炸性新闻贪图出名?”……不管周围的人怎么想，怎么讲，何驽并没有因此懈怠和放弃。之后何驽又邀请15名国内著名天文学专家亲临现场进行论证，基本确认该遗迹是天文观测遗址。而这前前后后的两年中，何驽的付出却是令人难以想象的，因为他的工作已经超出了考古专业的范围，涉足了天文学等领域，可想而知，没有百折不挠的精神，没有对事业的执着追求，不注重学习、研究、设想、推断，是很难有所作为的。

    2005年11月10日，世界顶级刊物《自然》杂志第438期刊登了陶寺发现古观象台的消息。英国、法国、德国、日本、波兰的学者对此表现出极大的兴趣并予以赞赏。

(有删改)

巴西利亚位于五带中的（ ）

下图为某地交通线路示意图，读图回答下列各题。

VB应用程序界面如上图所示，在文本框text1中输入查询的日期（以月日形式，如0623），单击“查询”按钮，在列表框中显示所有这个日子出生的员工姓名（按姓名排序），并在Label3处显示员工数量，如果人数为0，则在列表框中显示“本天没有员工生日”。

解决此问题的VB程序如下，阅读程序并完成后面的问题。

‘定义存放员工姓名的数组na

Private Sub CmsqClick()

  Dim n As Integer , i As Integer , j As Integer

  Dim t1 As String

  ‘连接数据库获取数据

  Dim cn As new connection

  Dim rs As new recordest

  Dim str1 As String , str2 As String

     str1 =”driver=Microsoft access driver(*.mdb)”；dbq=”&app.path”&”员工信息.mdb”

     cn.open str1

     str2 = “select * form members where 生日 ＝’“ + text1.text + ”’”

     rs.open str2 ， cn.adOpenDynamic ，adLockOptimistic

     n = 0

     Do While Not Rs.EOF

       n = n + 1

       na(i) = rs.Fields(“姓名”).value

       rs.MoveNext

     Loop 

     rs.close

     cn.close

‘按姓名排序

If n = 0 Then

  List1.AddItem “本天没有员工生日”

Else

  For i = 1 to n-1

    For j = 1 to n+1 Step -1

      If na(j) < na(j-1) Then

        t1 = na(j) :     ①      : na(j-1) = t1

      End If

    Next j

   Next i

   For i = 1 to n

     List1.AddItem     ②   

   Next i

   Label3.Caption = “这天共” + Str(n) + “位员工生日”

  End If

End Sub