有一块岩石体积为40米³，为了测定它的质量，取一小块作为样品，测出样品的质量为70克，用量筒装入70毫升的水，然后把样品浸没在水中，此时水面升高到95毫升，则

（1）石块的密度是多少？

（2）岩石的质量是多少？

下列数组声明正确的是( )。

A．n=5
Dim a(1 to n) As Integer

B．Dim a(10) As Integer
ReDim a(1 To 12)

C．Dim a() As Single
ReDim a(3,4) As Integer
ReDim a(1 to n)As Integer

D．Dim a() As Integer
n=5