Напишите программу в паскаль abc, которая запрашивает значения x,y,z, а затем выводит значение следующих функций: max(x,min(y,z)) и min(min(x,y),z)

yanchikkatsia yanchikkatsia    1   28.05.2019 08:40    0

Ответы
maks200206 maks200206  25.06.2020 18:55
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.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика