Contact: aviboots(AT)netvision.net.il
39,868 questions
51,791 answers
573 users
Imports System Public Class Test Public Shared Sub Main() Dim x as Integer = -87, y as Integer = -9 dim n as Integer = IIf((x < y), 1, 0) Dim min_ as Integer = y Xor ((x Xor y) And -(n)) Console.WriteLine(min_) End Sub End Class ' Run: ' ' -87