Question

Даны действительные положительные числа а, b, с, х, у. выяснить, пройдет ли кирпич с ребрами а, b, с в прямоугольное отверстие со сторонами х и у. просовывать кирпич в отверстие разрешается только так, чтобы каждое из его ребер было параллельно или перпендикулярно каждой из сторон отверстия.

Answer 1

Var a,b,c,x,y:real;
begin
writeln('Введите рёбра кирпича через пробел');
readln(a,b,c);
writeln('Введите размеры дыры');
readln(y,x); 
if (a<c) and (b<c) then  begin if (a<x)and(b<y) or (a<y) and (b<x) then write('Пройдёт')end 
else  if (b<a) and  ((b<x)and(c<y) or (b<y) and (c<x) ) then  write('пройдёт')  
else if (a<y) and ((c<x)and(a<y) or (c<y) and (a<x)) then write('пройдёт') 
else write ('не пройдёт');
end.