ПОМОГИТЕ ПОЖАЛУЙСТА МНЕ ЧЕРЕЗ ПАСКАЛЬ: Разработать схему алгоритма для определения минимума из трёх чисел без использования логических операций. Протестировать алгоритм на следующих исходных данных: а) 2 5 1 б) 0 -2 8 в) -4...
ПОМОГИТЕ ПОЖАЛУЙСТА МНЕ ЧЕРЕЗ ПАСКАЛЬ:
Разработать схему алгоритма для определения минимума из трёх чисел без использования логических операций. Протестировать алгоритм на следующих исходных данных:
а) 2 5 1
б) 0 -2 8
в) -4 5 10
Ответ(ы) на вопрос:
Решение твоей задачки^^
{Рабочая программа. Решение основано на определении модуля числа}
var
a, b, c, d: integer;
begin
read(a, b, c);
d := (a + b - abs(a - b)) div 2;
writeln((d + c - abs(d - c)) div 2);
end.
Не нашли ответ?
Похожие вопросы