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(/(sin(2*x)+max(x,y,z)/min(x,y,z)); writeln(u); end.
Популярные вопросы