; Created By: Ian Stait-Gardner
; Project: Project B

; Variable declarations
Dim Nums(3)

; Populate variables with user input
For I = 0 To 2
  Nums(I) = Input("Please input a number: ")
Next

; Perform Addition and Multiplication and Output results

; Addition
Print ""
Nums(3) = Nums(0) + Nums(1) + Nums(2)
Print "The sum of those values is equal to " + Str(Nums(3))

; Multiplication
Nums(3) = Nums(0) * Nums(1) * Nums(2)
Print "The product of those values is equal to " + Str(Nums(3))

WaitKey()
End