填空题

下面程序段的输出结果为 (6) 。
Dim S1(5) As Integer,S2(5) As Integer,S3(5) As Integer
N=4
For I=1 To N
S1(I)=I
L=N+1-I
S2(I)=L
Next I
S3(5)=0
For K=1 To N
S3(K)=S1(K)*S2(K)
S3(5)=S3(5)+S3(K)
Next K
Print S1(3); S1(5); S1(2)
Print S2(4); S3(1); S3(5)