program pr3;
var x,y,z,max,mid,min,sum:real;
 begin
writeln('enter x-');
 readln(x);
writeln('enter y-');
 readln(y);
writeln('enter z-');
 readln(z);
   case (x>y) and (x>z) of
      true: case y>z of
              true:
                   begin
                    max:=x;
                    mid:=y;
                    min:=z; 
                   end;             
              else 
                   begin
                    max:=x;
                    mid:=z;
                    min:=y;
                   end;
            end;
      
     else case (y>x) and (y>z) of 
            true: case x<z of 
                    true:
                         begin
                          max:=y;
                          mid:=z;
                          min:=x;
                         end;
                    else 
                         begin
                          max:=y;
                          mid:=x;
                          min:=z;
                         end;
                  end;
            else case (z>x) and (z>y) of //40
                 true: case x<y of
                       true:
                            begin
                             max:=z;
                             mid:=y;
                             min:=x;
                            end;

                       else 
                            begin
                             max:=z;
                             mid:=x;
                             min:=y;
                            end;
                      end;
         end;
   end;
writeln('max-',max:5:2);
writeln('mid-',mid:5:2);
writeln('min-',max:5:2);

sum:=z+x+y;
case sum>0 of
 true:
     begin
      min:=min*min*min;
      max:=max/4;
      mid:=0;
     end;
 end;
writeln('max-',max:5:2);
writeln('mid-',mid:5:2);
writeln('min-',max:5:2);
readln;
end.