修改职工的工资，给工龄大于等于20年以上的职工每人增加100元，工龄在20年以下的职工增加40元，请将程序补充完整。 SET TALK OFF USR 职工工资表 DO WHILE 【11】 IF 工龄＞＝20 REPLACE 工资 WITH 工资+100 ELSE REPLACE 工资 WITH 工资+40 ENDIF SKIP ENDDO SET TALK ON

某男，38岁。两年前因“颅脑外伤”而住院，出院后时有头痛，位于右侧顶部，痛时伴左侧上肢抽搐。舌质略黯，苔白，脉涩。

其辨证分型是（）

A.风痰闭阻证

B.痰火扰神证

C.瘀阻脑络证

D.心脾两虚证

E.心肾亏虚证