(while((^(a b c)(print(if(>(+ a c)b(- a c)(- b))1 0)))#0=(read)#0##0#))