Add tasks for all the new languages
This commit is contained in:
parent
9dc3c2bb62
commit
bba7bfd280
13208 changed files with 134745 additions and 0 deletions
|
|
@ -0,0 +1,15 @@
|
|||
' FB 1.05.0 Win64
|
||||
|
||||
Function Increment (num As String) As String
|
||||
Dim d As Double = Val(num)
|
||||
Return Str(d + 1.0)
|
||||
End Function
|
||||
|
||||
Dim num(5) As String = {"1", "5", "81", "123.45", "777.77", "1000"}
|
||||
For i As Integer = 0 To 5
|
||||
Print num(i); " + 1", " = "; Increment(num(i))
|
||||
Next
|
||||
|
||||
Print
|
||||
Print "Press any key to exit"
|
||||
Sleep
|
||||
Loading…
Add table
Add a link
Reference in a new issue