Работа 3.3 Упр.4 Задание 1 ГДЗ Семакин 10 класс (Информатика)

Задача

Написать программу нахождения суммы большего и меньшего из 3 чисел.

Подробный ответ

Нужно найти сумму наибольшего и наименьшего из трёх целых чисел. Для этого удобно сначала определить min и max, а затем вычислить их сумму.

Сначала сравниваем числа и находим минимальное:

если $$a \le b$$ и $$a \le c$$, то $$min := a$$;
если $$b \le a$$ и $$b \le c$$, то $$min := b$$;
если $$c \le a$$ и $$c \le b$$, то $$min := c$$.

Затем аналогично находим максимальное:

если $$a \ge b$$ и $$a \ge c$$, то $$max := a$$;
если $$b \ge a$$ и $$b \ge c$$, то $$max := b$$;
если $$c \ge a$$ и $$c \ge b$$, то $$max := c$$.

После этого вычисляем:

$$summa = max + min$$

var
  a, b, c: integer;
function summa(a, b, c: integer): integer;
var
  max, min: integer;
begin
  if (a <= b) and (a <= c) then min := a;
  if (b <= a) and (b <= c) then min := b;
  if (c <= a) and (c <= b) then min := c;
  if (a >= b) and (a >= c) then max := a;
  if (b >= a) and (b >= c) then max := b;
  if (c >= a) and (c >= b) then max := c;
  summa := max + min;
end;
begin
  read(a, b, c);
  writeln(summa(a, b, c));
end.