VBScript code in QTP for to display addition of two arrays

Option explicit

Dim array1(4), array2(4), array3(4), i

For i=0 to 4 step 1

      array1(i)=inputbox("Enter value for Array 1 :")

Next

For i=0 to 4 step 1

      array2(i)=inputbox("Enter value for Array 2 :")

Next

For i=0 to 4 step 1

      array3(i)=cint(array1(i))+cint(array2(i))

      print(array3(i))

Next