B4R Question Calculation problems

[IVR]

#Region Project Attributes
    #AutoFlushLogs: True
    #CheckArrayBounds: True
    #StackBufferSize: 300
#End Region

Sub Process_Globals
    'These global variables will be declared once when the application starts.
    'Public variables can be accessed from all modules.
    Public Serial1 As Serial
End Sub

Private Sub AppStart
    Serial1.Initialize(115200)
    Dim val As ULong = ((1500 * 24) / 36)
    Log("Val = ", val)
End Sub

Hi, I have a problem with the calculation in the example.
Could you give me some explanation?
I have version 2.0
Result: Val = 0
Thank you

 

[Erel]

The problem is that (1500 * 24) is calculated as an int value and it overflows.

You need to force it to use ULong:

Dim l1 = 1500 As ULong
Dim val As ULong = (l1 * 24) / 36
Log("Val = ", val)