6 respuestas en este tema

[Delphius]

Hola muchachos,

Disculpen mi preguntonta pero ya estoy dudando feo sobre un código que tengo...
No tengo conocimientos en C y ese es el problema. Ya estoy confundido...

Cuando tengo algo como:

cpp

return algo;

En una función se provoca la finalización de la función regresando el valor de "algo" ¿no es así? Es decir... ¿Vendría a ser como una mezcla de result y Exit de Delphi?:

delphi

result := algo;
Exit;

¿Por más que tengo algo como esto?:

cpp

if (condicion)
  return algo;
otras sentencias...

Ahora... yendo al tema del IF, ¿cuando se tiene una sola sentencia no es necesario el uso de llaves { y } no es así? ¿Y como se separa la parte then del else?

Porque tengo esto:

cpp

if (fabs(A - B) < maxAbsoluteError)
  return true;
float relativeError;
if (fabs(B) > fabs(A))
  relativeError = fabs((A - B) / B);
else
  relativeError = fabs((A - B) / A);
if (relativeError <= maxRelativeError)
  return true;
return false;

Y me hago bolas... ando dudando... ¿Las instrucciones desde la declaración de relativeError están fuera del IF o pertenecen a la parte then de éste?

Les agradecería que me sacaran estas dudas básicas.

Saludos,

[Jagluiperd]

Así es como yo lo veo:

cpp

if (fabs(A - B) < maxAbsoluteError) return true;
-------------------------------------------------------
float relativeError;
-------------------------------------------------------
if (fabs(B) > fabs(A))
   relativeError = fabs((A - B) / B);
  else
    relativeError = fabs((A - B) / A);
-------------------------------------------------------
if (relativeError <= maxRelativeError) return true;
-------------------------------------------------------
return false;

Saludos.

[Delphius]

Efectivamente asi es como lo estaba entendido inicialmente Jagluiperd. La traducción al código en Delphi que había hecho es esta:

delphi

var relativeError: double;
begin
if Abs(A - B) < maxAbsoluteError
  then begin
           result := true;
           Exit;
         end;
if Abs(B) > Abs(A)
  then relativeError := Abs((A - B) / B)
  else relativeError := Abs((A - B) / A);
 
 
if relativeError < maxRelativeError
  then result := true
  else result := false;
end;

Pero luego de ver más código ya me agarró la cosa y empecé a dudar de lo poco que conozco de C... empecé a preguntarme si los siguientes IFs son parte del then del primero... si return provocaba o no la finalización... etc.

Saludos,

[Wilson]

Optimizando un poquitin el código anterior:

delphi

var relativeError: double;
begin
 Result :=  (Abs(A - B)) < maxAbsoluteError;
  if Result then
   Exit;
  if (Abs(B)) > (Abs(A)) then 
    relativeError := Abs((A - B) / B)
  else 
    relativeError := Abs((A - B) / A);
 Result :=  relativeError < maxRelativeError;
end;

[Delphius]

Pues si, se puede optimizar el código. 

El asunto es si yo estaba entendiendo bien C o estoy errando en algo.

Saludos,

[escafandra]

Veo que la duda está resuelta, pero me gustaría ahondar un poco en este tema para mostrar las posibilidades de ese código en C.

La versión mas similar a la última dada en delphi sería esta, se entiende bastante bien:

cpp

  
  if (fabs(A - B) < maxAbsoluteError) return true;
 
  float relativeError;
  if (fabs(B) > fabs(A))
    relativeError = fabs((A - B) / B);
  else
    relativeError = fabs((A - B) / A);
 
  return relativeError <= maxRelativeError;

Un paso mas en la contracción del código no se entiende tanto, pero es posible usando el operador ?: expresado como E1 ? E2 : E3. Mirad el ejemplo:

cpp

  if (fabs(A - B) < maxAbsoluteError) return true;
  float relativeError = fabs(B) > fabs(A) ? fabs((A-B)/B) : fabs((A-B)/A);
  return relativeError <= maxRelativeError;

Lo siguiente es todavía mas críptico pero tremendamente resumido:

cpp

  if (fabs(A - B) < maxAbsoluteError) return true;
  return (fabs(B) > fabs(A) ? fabs((A-B)/B) : fabs((A-B)/A)) <= maxRelativeError;

Saludos.

[Delphius]

Hola,

Vaya... no pensé que podría ponerse más críptica la cosa. Ya estaba pensando que tenía que sacarme un Master en criptografía para entenderlo 

Yo mejor me quedo con la sintaxis de Delphi.
Pongo como resuelto al hilo, y quito el modo paranoico de mi cabeza.

Saludos,