Регистрация
Níkiskastarling28
09.08.2022 14:46
Информатика
Есть ответ 👍

Написать программу для отыскания max(min(a,b), min(c, не используя сложные логические условия и вложенные ветвления. числа a,b,c,d - целые. протестировать программу для следующих исходных данных: а) a=4 b=5 c=6 d=9 б) a=2 b=1 c=6 d=9 в) a=2 b=1 c=8 d=4 г) a=12 b=1 c=6 d=9

191
270
Посмотреть ответы 2

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

Соря11
Соря11
4,7(29 оценок)
Var a,b,c,d,m1,m2,max: integer; begin write('введите a,b,c,d: '); readln(a,b,c,d); if a< b then m1: =a else m1: =b; if c< d then m2: =c else m2: =d; if m1< m2 then max: =m2 else max: =m1; writeln('max=',max) end.
Negogda
Negogda
4,8(86 оценок)
Вариант б, тут все легко

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