Implementazioni di algoritmi/Calcolo della Pasqua: differenze tra le versioni
Contenuto cancellato Contenuto aggiunto
m →Delphi |
Nessun oggetto della modifica |
||
Riga 656:
END;
</source>
==BASH==
<source lang="bash">
#!/bin/bash
if [ $1 ]; then
anno=$1
else
read -p "Inserire l'anno per il quale calcolare la pasqua: " anno
fi
let a=$anno%19
let b=$anno%4
let c=$anno%7
if [ $anno -ge 1583 ] && [ $anno -le 1699 ];
then
m=22
n=2
elif [ $anno -ge 1700 ] && [ $anno -le 1799 ];
then
m=23
n=3
elif [ $anno -ge 1800 ] && [ $anno -le 1899 ];
then
m=23
n=4
elif [ $anno -ge 1900 ] && [ $anno -le 2099 ];
then
m=24
n=5
elif [ $anno -ge 2100 ] && [ $anno -le 2199 ];
then
m=24
n=6
elif [ $anno -ge 2200 ] && [ $anno -le 2299 ];
then
m=25
n=0
elif [ $anno -ge 2300 ] && [ $anno -le 2399 ];
then
m=26
n=1
elif [ $anno -ge 2400 ] && [ $anno -le 2499 ];
then
m=25
n=1
fi
let d=(19*$a+$m)%30
let e=(2*$b+4*$c+6*$d+$n)%7
let appo=$d+$e
if [ $appo -lt 10 ];
then
data=$d+$e+22/3/$anno
else
let giorno=$d+$e-9
if [ $giorno -eq 26 ];
then
giorno=19
fi
if [ 25 == $giorno ] && [ 28 == $d ] && [ $e == 6 ] && [ $a > 10 ];
then
giorno=18
fi
data=$giorno/4/$anno
fi
echo $data
</source>
== Altri progetti ==
| |||