Calculadora com Perl com menos de 10 linhas de código

Publicado por Thiago Glauco Sanchez (última atualização em 24/05/2010)

[ Hits: 5.870 ]

Homepage: www.ticursos.net/ambiente_academico

Download calc.pl




Um script simples que calcula expressões matemáticas inteiras, como 5 + 5 ou 10 * 3 ou 2*(3+10/5). Mostra como este tipo de coisa é mais simples em Peerl que em C ou outras linguagens. O script todo tem 5 linhas.

Ex.:

5 + 3 *(25/5)
20
tan deg2rad 45
1
sin 90
0.893996663600558
sin 0
0
cos 45
0.52532198881773
sin 45
0.850903524534118
2**2
4
5 + 3**3
32

Funções:

sin cos e tan, que recebem dados em radianos. Para converter graus em radianos use deg2rad como nos exemplos.

Para sair digite: ctrl + c

  



Esconder código-fonte

use Math::Trig;
while(my $expr = <STDIN>){
chomp($expr);
my $result = eval $expr;
print $result, "\n";}'

Scripts recomendados

Relatórios do Sarg por grupo

Randomize MP3

Screenshot

Testando a agilidade do sistema de arquivos

Check All Process


  

Comentários

Nenhum comentário foi encontrado.


Contribuir com comentário




Patrocínio

Site hospedado pelo provedor RedeHost.
Linux banner

Destaques

Artigos

Dicas

Tópicos

Top 10 do mês

Scripts