Elegir el menor valor

Mie Jun 04, 2008 6:17 pm

lis
Perlero Nuevo

Registrado: 27 May 2008
Mensajes: 32

Hola a todos, mi problema es el siguiente: ocupo la ecuación de la distancia entre dos puntos:

Perl:

$d = ((x2-x1)^2+(y2-y1)^2)^1/2

y quiero saber la distancia de cuatro puntos con respecto a uno y obtengo lo siguiente:

Perl:

$d1=1.12712022428843
$d2=1.23810338825157
$d3=0.576974869470063
$d4=0.771621668954421

Y quiero elegir el menor de ellos con un Perl script.

Ayúdenme porfis, gracias...

Jue Jun 05, 2008 2:28 am

explorer
Moderador

Registrado: 24 Jul 2005
Mensajes: 4222
Ubicación: Valladolid, España

Perl:

$minimo = $d1 if $d1 < $minimo;
$minimo = $d2 if $d2 < $minimo;
$minimo = $d3 if $d3 < $minimo;
$minimo = $d4 if $d4 < $minimo;

	Foros de discusión -> Básico	Todas las horas son GMT - 6 Horas
Página 1 de 1