Есть ответ 👍

Даны различные действительные числа x, y, z, d. найти max (min (x, y), min (x, z), min (z, решить в делфи 7

184
454
Посмотреть ответы 2

Ответы на вопрос:


Var       x, y, z, d: real; function min(a, b: real): real; begin       if a < b then               min : = a       else min : = b; end; function max(a, b: real): real; begin       if a > b then               max : = a       else max : = b; end; begin       readln(x, y, z, d);       writeln(max(min(x, y), max(min(x, z), min(z, ; end.

Сравниваешь их если и ставишь ислоаие гпример если первое больше то второе увеличить 10 раз если нет то первое число увеличить в 10 раз

Популярно: Информатика