这个Perl解决方案适用于整数、浮点数和字符串。

sub f {
    my $n = shift;
    return ref($n) ? -$$n : \$n;
}

尝试一些测试数据。

print $_, ' ', f(f($_)), "\n" for -2, 0, 1, 1.1, -3.3, 'foo' '-bar';

输出：

-2 2
0 0
1 -1
1.1 -1.1
-3.3 3.3
foo -foo
-bar +bar

斯卡拉：

def f(x: Any): Any = x match {
  case i: Int => new { override def hashCode = -i }
  case i @ _  => i.hashCode
}

在Java中也是如此：

public static Object f(final Object x) {
  if(x instanceof Integer) {
    return new Object() {
      @Override 
      public int hashCode() {
        return -(Integer)x;
      }
    };
  }
  return x.hashCode();
}

这个问题并没有说明函数f的输入类型和返回值必须是什么（至少不是你给出的方式）。。。

…只是当n是32位整数时，f（f（n））=-n

那么，怎么样

Int64 f(Int64 n)
{
    return(n > Int32.MaxValue ? 
        -(n - 4L * Int32.MaxValue):
        n + 4L * Int32.MaxValue);
}

如果n是32位整数，则语句f（f（n））==-n将为真。

显然，这种方法可以扩展到更大范围的数字。。。

MIN_INT不会失败：

int f(n) { return n < 0 ? -abs(n + 1) : -(abs(n) + 1); }

使用全局。。。但事实如此？

bool done = false
f(int n)
{
  int out = n;
  if(!done)
  {  
      out = n * -1;
      done = true;
   }
   return out;
}

事实上，我并没有试图给出问题本身的解决方案，但我有几点意见，因为问题表明，提出这个问题是（工作？）面试的一部分：

我会先问“为什么需要这样的函数？这是什么更大的问题？”而不是试图当场解决实际提出的问题。这表明了我是如何思考和解决这样的问题的。谁知道？这甚至可能是在一次采访中首先提出这个问题的真正原因。如果答案是“没关系，假设它是需要的，并告诉我如何设计这个功能。”我会继续这样做。然后，我将编写我将使用的C#测试用例代码（显而易见：从int.MinValue到int.MaxValue的循环，对于该范围内的每个n调用f（f（n）），并检查结果是-n），告诉我将使用测试驱动开发来获得这样的函数。只有当面试官继续要求我解决所提出的问题时，我才真正开始在面试过程中胡乱写下伪代码，试图得到某种答案。然而，如果面试官能说明公司的情况，我真的不认为我会跳下去接受这份工作。。。

哦，这个答案假设面试是针对一个与C#编程相关的职位。如果面试的是与数学相关的职位，那当然是一个愚蠢的答案