Calculeiras

Que tal postar aqui uns shellscripts só para fazer alguns cálculos (por mais imbecis e inúteis que possam parecer)? O pré-requisito para colocar um script aqui seria "fazer algum cálculo" em shellscript.

Pra começar, um que simplesmente calcula o fatorial do número digitado pelo usuário (claro, falta código de proteção para erros...)

#-----------
#Arquivo fatorial.sh
#By Jarnotrulli - Quem souber do
#original me avise!
#

echo "Digite o numero:_"
read NUM

seq 1 1 $NUM|paste -sd'*'|bc
#Alternativa:
#seq 1 1 $NUM -d'*'|bc

E é só rodar com um:
$ bash fatorial.sh

Estava um dia lendo um artigo aqui no vol sobre este comando e fiz um script pq tava curioso, não é a oitava maravilha em shell, mas:

#!/bin/bash

a=123456789
b=987654321
c=$a+$b
d=$a*$b
e=$b/$a
f=$a^2
g=$b^2
h="sqrt($b)"
i="((((($a+$b)*($a)*($b))^2)^8)^8)^8" ## Isso é {[({[(a+b)*(a)*(b)]^2}^8)^8]}^8
## j="sqrt($i)"

echo $a
echo $b
echo $c | bc
echo $d | bc
echo $e | bc
echo $f | bc
echo $g | bc
echo "scale=7;$h" | bc
echo "scale=8;$h" | bc
echo "scale=9;$h" | bc
echo "scale=10;$h" | bc
echo "scale=11;$h" | bc
echo "scale=12;$h" | bc
echo "scale=20;$h" | bc
echo "scale=40;$h" | bc
echo "scale=60;$h" | bc
echo $h | bc
echo $i | bc

Salve com um nome e torne ele executável. A variável i é um número enorme.Para ver isso tudo em um arquivo texto:

./nome_do_script > /home/usuario/arquivo_texto

Falta fazer ele inserir uma linha em branco entre cada número para ser melhor visualizado, mas com esse já da pra ter uma idéia do comando bc.

Ah, esqueci de dizer, onde tem sqrt ele calcula a raiz quadrada, o onde tem scale, é pra dizer com quantas casas decimais a variável deve sair.

Bom, como disse o script mostrava os resultados tudo junto, ae refiz ele e agora entre um resultado e outro tem uma linha, veja ae o script refeito:

#!/bin/bash

a=123456789
b=987654321
c=$a+$b
d=$a*$b
e=$b/$a
f=$a^2
g=$b^2
h="sqrt($b)"
i="((((($a+$b)*($a)*($b))^2)^8)^8)^8"

echo $a
echo -e "\n"
echo $b
echo -e "\n"
echo $c | bc
echo -e "\n"
echo $d | bc
echo -e "\n"
echo $e | bc
echo -e "\n"
echo $f | bc
echo -e "\n"
echo $g | bc
echo -e "\n"
echo "scale=7;$h" | bc
echo -e "\n"
echo "scale=8;$h" | bc
echo -e "\n"
echo "scale=9;$h" | bc
echo -e "\n"
echo "scale=10;$h" | bc
echo -e "\n"
echo "scale=11;$h" | bc
echo -e "\n"
echo "scale=12;$h" | bc
echo -e "\n"
echo "scale=20;$h" | bc
echo -e "\n"
echo "scale=40;$h" | bc
echo -e "\n"
echo "scale=60;$h" | bc
echo -e "\n"
echo $h | bc
echo -e "\n"
echo $i | bc
echo -e "\n"

Gostei!
Detalhe: este aqui só usa BASH mesmo, sem binários...

F=5
fat=1
N=1
while (($N <= $F))
do
fat=$(( $fat * $N ))
let N="$N +1"
done

echo Fatorial de $F = $fat

Tá, tá bom... o echo é um binário :-D
$ which echo
/bin/echo

FAT=30
seq -s '*' 1 $FAT|bc

Quer tentar com 3000? Sim, ele faz:

FAT=3000
seq -s '*' 1 $FAT|bc

Fatorial de 10mil? Sim, levou 4s em meu hardware e me retornou um número com aprox 36 mil digitos (alguém pode testar o resultado na calculadora do Windows? Só pra ver se o bc fez certo...)

everson.~$ time seq -s '*' 1 10000|bc | wc
525 525 36709

real 0m2.333s
user 0m2.312s
sys 0m0.012s

Por que diabos alguém ressuscita um tópico cuja última postagem é de 2007?

Porque ele o leu agora e isto é que é legal do VOL.

Além do mais, já que eu e tu estarmos lendo o tópico, este fato justifica a sua "ressurreição" :-D