Алгоритм сравнения трех чисел - Pascal

Узнай цену своей работы

Формулировка задачи:

Голову сломал уже. Подскажите оптимальный алгоритм сравнения трех чисел. Необходимо учесть все варианты, в том числе равенство. У меня получается не 10 сравнений, а это много.

Решение задачи: «Алгоритм сравнения трех чисел»

textual
Листинг программы
if ((a=b) and (a=c) and (b=c)) then
   begin
   if ((a>b) and (a>c))  then
      writeln ('a больше b и c');
   if ((a<b) and (b>c)) then
      writeln ('b больше a и c');
   if ((a<c) and (b<c)) then
      writeln ('c больше a и b');
   end

Объяснение кода листинга программы

  1. Название переменных: a, b, c Значения переменных: числовые значения, например, 3, 5, 3
  2. Проверка равенства трех чисел:
    • Выполняется проверка равенства a, b и c
  3. В случае равенства всех трех чисел:
    • Проводится проверка наибольшего числа:     - Если a больше b и c, выводится сообщение a больше b и c     - Если b больше a и c, выводится сообщение b больше a и c     - Если c больше a и b, выводится сообщение c больше a и b

Оцени полезность:

7   голосов , оценка 4.429 из 5
Похожие ответы