еще одна задачка

[avva]

Эта запись будет интересна только программистам (ну или еще может математикам). Задача не особенно сложная, комменты скрывать не буду, не смотрите туда, если не хотите спойлеров.

Задача: написать функцию f(x), так, что f(f(x) = -x. Разрешено использовать только
целые числа. x - целочисленный аргумент (например, 32-битный).

Update: интересно, что никто, кажется, не дал правильного решения для 32-битных чисел (для "вообще целых чисел" правильных решений куча).

Update: неудивительно, потому что для 32-битных решения нет! :) У меня был глюк.

Comments

[deni-ok.livejournal.com]

В моём решении на Хаскелле целое может иметь неограниченый тип. В задаче же сказано - "например, 32-битный" ;)

*Main1> f (f 121242353765876798568679780895756524534657345)
-121242353765876798568679780895756524534657345

[http://users.livejournal.com/magister_/]

но ведь целое не может иметь неограниченный тип?

[deni-ok.livejournal.com]

По какой причине?

*Main1> let fac x = if x == 0 then 1 else x * fac (x - 1)
*Main1> fac 100
9332621544394415268169923885626670049071596826438162146859
2963895217599993229915608941463976156518286253697920827223
758251185210916864000000000000000000000000

[kurilka.livejournal.com]

Ну вообще, конечно, есть ограничение по памяти :)

[deni-ok.livejournal.com]

Ты знал! Ты знал! :)