Dim intNumberItems as Integer = 123
Dim decShoppingAmount as Decimal = 100.0
Dim DecTotalCost as Decimal
if intNumberItems > 5 or DecShoppingAmount > 100 then
DecTotalCost = (intNumberItems * 5 / DecShoppingAmount)
Console.Write(decTotalCost.ToString())