fork download
  1. WhatBase = ...
  2. @(x,y,z)max([m=max(x+y-z) [x y z]])+~m
  3.  
  4.  
  5. WhatBase([12, 103],[4, 101],[16, 204])
  6. WhatBase([4, 21, 25],[5, 1, 20],[9, 23, 17])
  7. WhatBase([16, 11],[25, 94],[41, 105])
  8. WhatBase([2, 140],[21, 183],[24, 100])
  9. WhatBase([8, 157],[1, 28],[9, 185])
  10. WhatBase([2, 158],[0, 88],[3, 12])
  11. WhatBase([8, 199],[1, 34],[9, 233])
  12. WhatBase([3, 247],[7, 438],[11, 221])
  13. WhatBase([3, 122],[3, 2],[6, 124])
  14. WhatBase([6, 328],[3, 31],[9, 359])
  15. WhatBase([0, 0, 2, 1, 0, 0, 0, 0],[1, 2, 0, 0, 1, 0, 1, 0],[1, 2, 2, 1, 1, 0, 1, 0])
  16. WhatBase([16, 105],[16, 120],[33, 84])
  17. WhatBase([15, 60],[9, 30],[24, 90])
  18. WhatBase([2, 0],[1, 2],[3, 2])
  19. WhatBase([1, 3, 3, 7],[0, 1, 2, 3],[1, 4, 6, 0])
  20. WhatBase([0, 0, 0],[1, 12, 8],[1, 12, 8])
  21. WhatBase([1, 0, 0, 0, 1, 0, 0, 0, 1, 1, 1, 0, 0, 1],[0, 0, 0, 1, 0, 0, 1, 0, 1, 1, 1, 0, 0, 1],[1, 0, 0, 1, 1, 0, 1, 1, 1, 1, 0, 0, 1, 0])
  22. disp('unary: 2 + 1 = 3');
  23. WhatBase([0, 1, 1], [0, 0, 1], [1, 1, 1])
  24. disp('binary: 3 + 1 = 4');
  25. WhatBase([0, 1, 1], [0, 0, 1], [1, 0, 0])
  26.  
Success #stdin #stdout 0.48s 121792KB
stdin
Standard input is empty
stdout
WhatBase =

@(x, y, z) max ([m = max(x + y - z), [x, y, z]]) + !m

ans =  205
ans =  28
ans =  106
ans =  223
ans =  186
ans =  234
ans =  234
ans =  464
ans =  125
ans =  360
ans =  3
ans =  141
ans =  91
ans =  4
ans =  10
ans =  13
ans =  2
unary: 2 + 1 = 3
ans =  1
binary: 3 + 1 = 4
ans =  2