Código de Perl - Conversor de grados Farenheit a Centigrados

Imágen de perfil

Conversor de grados Farenheit a Centigradosgráfica de visualizaciones


Perl

Publicado el 10 de Julio del 2013 por Xavi
4.257 visualizaciones desde el 10 de Julio del 2013
Simple conversor de grados Farenheit a Centigrados

Versión 1

Publicado el 10 de Julio del 2013gráfica de visualizaciones de la versión: Versión 1
4.258 visualizaciones desde el 10 de Julio del 2013
estrellaestrellaestrellaestrellaestrella
estrellaestrellaestrellaestrella
estrellaestrellaestrella
estrellaestrella
estrella

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
#!/usr/bin/perl
 
use strict;
use warnings;
 
print "Entra la temperatura en grados Fahrenheit: ";
my $temp = <STDIN>;
chomp($temp);
 
if($temp =~ /^-?\d+\.?\d*$/)
{
    my $fah;
    $fah = ($temp - 32) * 5/9;
    print "$temp grados Fahrenheit son $fah grados Centigrados\n";
}else{
    print "Error: Introduce un numero\n";
}



Comentarios sobre la versión: Versión 1 (0)


No hay comentarios
 

Comentar la versión: Versión 1

Nombre
Correo (no se visualiza en la web)
Valoración
Comentarios
Es necesario revisar y aceptar las políticas de privacidad

http://lwp-l.com/s2425