Foro - Perl en Español

por **mparrado8** » 2013-04-10 13:08 @589

Hola, soy nueva en el foro y también una novata en lo que se refiere a la utilización de Perl.
Planteo mi primera pregunta, aunque tengo la sensación de que mis preguntas van a ser muy frecuentes.

¿Hay algún comando concreto que permita introducir este valor sin tener que escribirlo a mano con todos sus decimales?

El programa consiste en calcular el área de un círculo, una vez dado el radio y que no funcione si el valor introducido para el radio es negativo. Sólo necesito saber cómo introducir pi para calcular el área.

Gracias

Muchas gracias, eso ya está solucionado, pero ahora tengo otro problema. Cuando leí el enunciado parecía muy fácil, pero realmente no lo es.

Mi código es el siguiente. Se ejecuta, aparentemente está bien, pero calcula otra cosa, y no sale bien el resultado. Creo que tiene algo que ver con cómo introducir y declarar las variables, pero no averiguo qué es:

Sintáxis: [ Descargar ] [ Ocultar ]

Using perl Syntax Highlighting

print "Introduce el valor del radio:\n";
$a = <STDIN>;
chomp ($a);
 
while ($a < 0)
{
print " El valor introducido no es correcto.\n Introduce un nuevo valor:\n";
$a = <STDIN>; 
}
$Pi = 3.141592625;
$b = ($a^2)*$pi;
print "El área del circulo es $b";
Coloreado en 0.001 segundos,  usando GeSHi 1.0.8.4

por **explorer** » 2013-04-10 15:56 @705

Pues porque en tu programa, hay dos variables distintas: una es $Pi y otra es $pi (Perl es sensible a las mayúsculas/minúsculas en el nombre de las variables).

Cuando se empieza con Perl, lo recomendable es activar el modo estricto y las advertencias, para que Perl nos avise de estos fallos:

Sintáxis: [ Descargar ] [ Ocultar ]

Using perl Syntax Highlighting

#!/usr/bin/perl
use strict;
use warnings;
 
print "Introduce el valor del radio:\n";
my $a = <STDIN>;
chomp ($a);
 
while ($a < 0) {
    print " El valor introducido no es correcto.\n Introduce un nuevo valor:\n";
    $a = <STDIN>;
    chomp ($a);
}
 
my $PI = 3.141592625;
 
my $b = ($a**2) * $PI;
 
print "El área del círculo es $b\n";
Coloreado en 0.001 segundos,  usando GeSHi 1.0.8.4

por **mparrado8** » 2013-04-10 16:34 @732

¡¡Cierto!!, parece realmente que no he hecho ni un solo programa, así me daba 0, pero una vez corregido el error, si por ejemplo primero introduzco el número -1, y luego el 5, el área me da 21.9911483.. en lugar de 78.53981634 que es lo qué debería salir. ¿Por qué ocurre eso?

por **explorer** » 2013-04-10 16:45 @739

El operador de exponenciación es '**', no '^', que es el operador de or-exclusivo.

Foro - Perl en Español

¿Cómo introducir el número pi en Perl?

¿Cómo introducir el número pi en Perl?

Publicidad

Re: ¿Cómo introducir el número pi en Perl?

Re: ¿Cómo introducir el número pi en Perl?

Re: ¿Cómo introducir el número pi en Perl?

Re: ¿Cómo introducir el número pi en Perl?

Re: ¿Cómo introducir el número pi en Perl?

¿Quién está conectado?