男性，37岁。头痛1个月，进行性加重，剧烈头痛10天，呕吐1天。神经系统查体：意识淡漠，两侧视神经盘水肿。

诊断应首先考虑（）。

A.颅内血肿

B.颅内肿瘤

C.结核性脑膜炎

D.脑脓肿

E.蛛网膜下腔出血

阅读下列FORTRAN77程序： DIMENSIONA(4，3) COMMON/P/A P＝0.0 D010K＝1，3 D010J＝1，3 1F(P.LE.5.0)P＝P+A(J，K) 10CONTINUE WRITE(*，*)P END BL()CKDATAABC DIMENSIONB(4，3) COMMON/P/B DATAB/4*4.0，4*-3.0，4*2.0/ END 运行上述程序后，输出的P值为( )。

A．(8.0

B．(7.0

C．(5.0

D．(4.0