Data commit
This commit is contained in:
parent
7387c8f97b
commit
cb5bb5e222
199093 changed files with 3378972 additions and 0 deletions
8
Task/Arrays/Gambas/arrays-1.gambas
Normal file
8
Task/Arrays/Gambas/arrays-1.gambas
Normal file
|
|
@ -0,0 +1,8 @@
|
|||
DIM mynumbers AS INTEGER[]
|
||||
myfruits AS STRING[]
|
||||
|
||||
mynumbers[0] = 1.5
|
||||
mynumbers[1] = 2.3
|
||||
|
||||
myfruits[0] = "apple"
|
||||
myfruits[1] = "banana"
|
||||
19
Task/Arrays/Gambas/arrays-2.gambas
Normal file
19
Task/Arrays/Gambas/arrays-2.gambas
Normal file
|
|
@ -0,0 +1,19 @@
|
|||
Public Sub Main()
|
||||
Dim sFixedArray As String[] = ["Rosetta", "code", "is", "a", "programming", "chrestomathy", "site"]
|
||||
Dim sFixedArray1 As New String[10]
|
||||
Dim iDynamicArray As New Integer[]
|
||||
Dim siCount As Short
|
||||
|
||||
For siCount = 1 To 10
|
||||
iDynamicArray.Add(siCount)
|
||||
Next
|
||||
|
||||
sFixedArray1[5] = "Hello"
|
||||
sFixedArray1[6] = " world!"
|
||||
|
||||
Print sFixedArray.Join(" ")
|
||||
Print iDynamicArray[5]
|
||||
|
||||
Print sFixedArray1[5] & sFixedArray1[6]
|
||||
|
||||
End
|
||||
Loading…
Add table
Add a link
Reference in a new issue