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

2. вычислить преизведение двух наименьших из трёх различных чисел.

3. даны числа х,у,z. найти значение выражения:
u=(max(в квадрате) (x,y,z) - 2(в степени x) (x,y,z))/( sin2x + max(x,y,z)/min(x,y,z)

1

Ответы и объяснения

2012-03-22T10:54:23+00:00

Это Проверенный ответ

×
Проверенные ответы содержат надёжную, заслуживающую доверия информацию, оценённую командой экспертов. На "Знаниях" вы найдёте миллионы ответов, правильность которых подтвердили активные участники сообщества, но Проверенные ответы - это лучшие из лучших.

var a,b,c,d:real;

Begin

   read(a,b,c,d);

   if ((a<c) and (b<d)) or ((b<c) and (a<d)) then

     writeln('Впишется')

   else writeln('Не впишется');

End.

 

var a,b,c:real;

Begin

   read(a,b,c);

   if (a>b) and (a>c) then a:= b*c;

   if (b>a) and (b>c) then a:= a*c;

   if (c>b) and (c>a) then a:= b*a;

 

   writeln(a);

End.

3)var x,y,z,u:real;
function max(x,y,z:real):real;
begin
  if (x>=y) and (x>=z) then max:= x;
  if (y>=x) and (y>=z) then max:= y;
  if (z>=y) and (z>=x) then max:= z;
end;

function min(x,y,z:real):real;
begin
  if (x<=y) and (x<=z) then min:= x;
  if (y<=x) and (y<=z) then min:= y;
  if (z<=y) and (z<=x) then min:= z;
end;

Begin
    read(x,y,z);
    u:=(max(x,y,z)*max(x,y,z)-exp(x*ln(2)))/(sin(2*x)+max(x,y,z)/min(x,y,z));
    writeln(u);
End.