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