Data update
This commit is contained in:
parent
5150844a7d
commit
4bb20c9b71
7735 changed files with 38060 additions and 199180 deletions
|
|
@ -1,15 +0,0 @@
|
|||
Function sum_and_product(arr)
|
||||
sum = 0
|
||||
product = 1
|
||||
For i = 0 To UBound(arr)
|
||||
sum = sum + arr(i)
|
||||
product = product * arr(i)
|
||||
Next
|
||||
WScript.StdOut.Write "Sum: " & sum
|
||||
WScript.StdOut.WriteLine
|
||||
WScript.StdOut.Write "Product: " & product
|
||||
WScript.StdOut.WriteLine
|
||||
End Function
|
||||
|
||||
myarray = Array(1,2,3,4,5,6)
|
||||
sum_and_product(myarray)
|
||||
Loading…
Add table
Add a link
Reference in a new issue