При вычислении с типами не длиннее INTEGER все промежуточные значения -- INTEGER.

В Вашем случае достаточно поставить LONG на крайний левый операнд. Операции одного уровня выполняются слева направо, и если хоть один LONG, то второй будет приведён к LONG автоматически.

Хотя для надёжности можно сделать и как посоветовал ИАД.