1. 读程序，写结果

1. （1） 执行以下程序段后，i的值是

   Dim i As Integer, s As Integer

   s=4

   i=9

   If i < 1 Then

      i=i-3

   Else

       i=s+i

   End If

3. （2） 执行以下程序段后，s的值为

   s=1

   For i=1 to 3

       s=s*i

   Next i