PlaSp = 1;
      En1Sp = 1;
      En2Sp = 10;
      T1 = "Pla";
      T2 = "En1";
      T3 = "En2";
      if (eval(T1+"Sp") < eval(T2+"Sp")) {
         saber = eval(T1);
         T1 = eval(T2);
         T2 = saber;
      }
      if (eval(T2+"Sp") < eval(T3+"Sp")) {
         saber = eval(T2);
         T2 = eval(T3);
         T3 = saber;
      }
      if (eval(T1+"Sp") < eval(T2+"Sp")) {
         saber = eval(T1);
         T1 = eval(T2);
         T2 = saber;
      }

Si C<B
   saber = B
   B=C
   C=saber
fin del si
Si B<A
   Saber = A
   A=B
   B=saber
fin del si
Si C<B
   saber = B
   B=C
   C=saber
fin del si