下列程序执行后，变量x的值为( )。 Dim a,b,c,d As Single Dim x As Single a=10 b=30 c=400 If b>a Then d=a:a=b:b=d End If If b>c Then x=b Else If a>c Then x=c Else x=a End If

A．10

B．30

C．400

D．430

甲公司因业务发展分立成丙公司和丁公司，双方约定原欠乙公司100万元债务由丙公司负责偿还。后因丙公司无力偿还，发生纠纷依法该笔债务应如何偿还( )

A．由丙公司偿还
B．由丁公司偿还
C．由丙公司和丁公司负连带责任
D．由丙公司和丁公司负按份责任