Dim As Integer n1, n2 Dim x As Double Dim isRaining As Boolean Dim As String greeting