Предмет: Информатика,
автор: sisikol
напишите программу в Паскаль ABC, которая запрашивает значения x,y,z, а затем выводит значение следующих функций: max(x,min(y,z)) и min(min(x,y),z)
Ответы
Автор ответа:
0
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.
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.
Интересные вопросы
Предмет: Русский язык,
автор: aikoshaaa2010
Предмет: Биология,
автор: frudio
Предмет: Математика,
автор: svetusik89
Предмет: Геометрия,
автор: физика2012
Предмет: Обществознание,
автор: HERO25022001