Напишите программу в паскаль abc, которая запрашивает значения x,y,z, а затем выводит значение следующих функций: max(x,min(y,z)) и min(min(x,y),z)
108
125
Ответы на вопрос:
Var x,y,z,a: integer; begin read(x; y; z); if y< z then a: =y else a: =z; if x> a then write(x) else write (a); writeln; if y< x then a: =y else a: =x; if a< x then write (a) else write (x); end.
Популярно: Информатика
-
ИванПро22822.09.2022 16:32
-
dementy117.08.2022 20:30
-
liubovbalan15.12.2020 17:05
-
sitkovskiygleb05.01.2023 01:11
-
CCAnuna24.06.2023 23:58
-
Настенька26201727.02.2021 12:13
-
Ramble228509.06.2022 19:35
-
sahsaperrucci22.09.2020 22:26
-
polisha01410.12.2021 06:21
-
kseniayozic29.05.2022 20:23