Среднее из трех чисел

@Оксана12 · Регистрация: 28.03.2014

Author24 — интернет-сервис помощи студентам

1.Предикат сравнения (> x у) истинен, если х больше, чем у. Необходимо задать с помощью предиката > и условного предложения функцию, которая возвращает из трех числовых аргументов значение среднего по величине числа. Например:

Lisp

1
2
3

(среднее 4 7 6)
 
==> 6

@Catstail · 05.10.2015, 17:58

Lisp

(defun task (x y z)
  (cond ((>= x y z) y)
        ((>= x z y) z)
        ((>= y x z) x)
        ((>= y z x) z)
        ((>= z x y) x)
        ((>= z y x) y)))  
 
==> task
 
(task 4 7 6)
 
==> 6
 
(task 7 4 6)
 
==> 6

@Оксана12 · 05.10.2015, 18:06 **[ТС]**

вместо cond надо использовать условный оператор if

@helter · 05.10.2015, 18:07

Сообщение от Оксана12

вместо cond надо использовать условный оператор if

Поделитесь, в чём заключается Ваша проблема в использовании этого оператора?

@Оксана12 · 05.10.2015, 18:10 **[ТС]**

всё отлично, спасибо

@Catstail · 05.10.2015, 18:33

Сообщение от Оксана12

вместо cond надо использовать условный оператор if

-

1) кому надо?
2) с if код будет "разлапистым"

@castorsky · 08.10.2015, 01:18

Catstail, топорно

Lisp

; racket-lang.org
 
(define (foo x y z)
  (min (max x y) (max y z) (max x z)))

@Vtulhu · 17.10.2015, 08:01

Lisp

1 2	(define (middle a b c) (if (or (and (>= b a) (<= b c)) (and (>= b c) (<= b a))) b (middle b c a)))

@Оксана12 0 / 0 / 0 Регистрация: 28.03.2014 Сообщений: 14
	05.10.2015, 18:06 [ТС]	3
	вместо cond надо использовать условный оператор if 0

@helter 4527 / 3521 / 358 Регистрация: 12.03.2013 Сообщений: 6,038
	05.10.2015, 18:07	4
	Сообщение от Оксана12 вместо cond надо использовать условный оператор if Поделитесь, в чём заключается Ваша проблема в использовании этого оператора? 0

@Оксана12 0 / 0 / 0 Регистрация: 28.03.2014 Сообщений: 14
	05.10.2015, 18:10 [ТС]	5
	всё отлично, спасибо 0

@Catstail Модератор 36601 / 20330 / 4220 Регистрация: 12.02.2012 Сообщений: 33,641 Записей в блоге: 13
	05.10.2015, 18:33	6
	Сообщение от Оксана12 вместо cond надо использовать условный оператор if - 1) кому надо? 2) с if код будет "разлапистым" 0

	17.10.2015, 08:01

Среднее из трех чисел

Решение