现有一堆圆锥形的沙需运走．圆锥的底面直径10米，高2米．用车厢为长方形的卡车运（

给加粗的字选择正确的字音。

chēng　　　　chèn

称赞（　　）　　匀称（　　）　　称心如意（　　）

sā　　　　　　sǎ

撒娇（　　）　　撒种（　　）　　撒谎（　　）

dào　　　　　dǎo

倒映（　　）　　倒下（　　）　　倒茶（　　）

患者从高坡上跌落四肢不能活动，检查：手骨间肌、蚓状肌无力，肱三头肌腱反射消失；双下肢瘫痪，各种反射消失

初步诊断为（）

A.上颈髓损伤

B.中颈髓损伤

C.下颈髓损伤

D.胸髓损伤

E.腰髓损伤

气缸盖产生热疲劳裂纹的部位主要集中在（）。

A．底面

B．冷却面

C．冷却面筋的根部

D．外表面

患者，男性，61岁，右利手，主诉3天来左眼失明多次发作，每次持续5分钟，进而持续头痛，语言表达困难，右手及右侧下部面肌力弱。最可能的诊断是

A．左侧大脑中动脉闭塞

B．累及左侧运动皮层区局限性癫痫发作

C．慢性硬脑膜下血肿

D．左侧颈内动脉闭塞

E．偏头痛

下列程序的功能是：当x＜50时，y=0.8×x；当50≤x≤100时，y=0.7×x；当x＞100时，没有意义。请填空。
Private Sub Command1_Click()
Dim x AS Single
x=InputBox("请输入x的值!")
(14)
Case Is＜50
　　y=0.8*x
　Case 50 To 100
　　y=0.7*K
(15)
Print"输入的数据出界!"
End Select
Print x，y
End Sub