Scheme: второе по максимальности число за одно действие?

Что значит "одно действие"? min(a, max(b, c)) -- здесь 2 действия.

(min (max a b)
     (max b c))

> Что значит "одно действие"? min(a, max(b, c)) -- здесь 2 действия.

ok, в одно выражение.

> min (max a b) (max b c))

Не катит, ибо вариант, когда b > a && b > c вернет здесь b.

Предположим, что a=1, b=3, c=1.

> Не катит, ибо вариант, когда b > a && b > c вернет здесь b.

Да, я уже заметил.

(min (max a b) (min (max b c) (max a c))

(min (max a b) (max a c) (max b c))

> (min (max a b) (min (max b c) (max a c))

Не будет работать при a == c && a > b.

> (min (max a b) (max a c) (max b c))

min и max могут иметь только 2 аргумента.

> Не будет работать при a == c && a > b.

А, здесь b ожидается что ли. Тогда варианта кроме кучи развесистых if-ов я не вижу.

Кстати условие про одно действие лучше уточнить. А то любая программа на Scheme может записываться в одно действие.

>Не будет работать при a == c && a > b.

В этой ситуации имеем a (=c), то есть, как и сказано в условии, второе по максимальности.

Прогнать (a;b;c) через трассирующий алгоритм сортировки. Это в особенности должно быть просто в лиспе.

Видимо считается, что a и c одновременно первые по максимальности, а b второе.

ИМХО, второе по максимальности из ряда (3, 2, 3) будет 2.

>ИМХО, второе по максимальности из ряда (3, 2, 3) будет 2.

Ну а теперь подставим:

(min (max a b) (min (max b c) (max a c))

(min (max 2 3) (min (max 3 2) (max 2 2))

(min 3 (min 3 2))

(min 3 2)

2

Ошибся, да. Но условие надо уточнить, anyway.

По поводу условий не ко мне, а к топикстартеру.

> Не будет работать при a == c && a > b.

> Но условие надо уточнить, anyway.

В данном случае неважно про a == c. Все работает так, как хотел. Спасибо всем за помощь!

max(min(max(b,c),a),c)

Ошибся.

max(min(max(b,c),a),min(b,c))