Cálculo do dia da Páscoa
Publicado por Luis Eduardo Boiko Ferreira (última atualização em 03/03/2010)
[ Hits: 9.550 ]
Homepage: https://www.facebook.com/luiseduardo.boiko
Programa para calcular o dia da páscoa baseado no algoritmo exposto por Jean Meeus em 1991. Eu poderia ter enxugado o código, eliminando alguns IFs de alguns meses... portanto, somente comentários construtivos serão bem vindos, não perca tempo me dizendo coisas já sabidas.
#coding: utf-8 #você pode modificar o codigo e distribuir a vontade, desde quee #nao retire o nome do Autor #Autor: Luis Eduardo Boiko Ferreira #e-mail: luiseduardo.boiko@gmail.com import time import datetime print ' _______________________________________' print '| |' print '| |' print '| Algoritmo para calcular |' print '| o dia da Pascoa |' print '| Desenvolvido por |' print '| Luis Eduardo Boiko Ferreira |' print '|_______________________________________|' anoatual = datetime.date.today().year print 'O ano atual é %s.' %anoatual ano=input('Digite o ano desejado para calcularmos o dia da páscoa:') a=ano%19 b=int(ano/100) c=ano%100 d=int(b/4) e=b%4 f=int((b+8)/25) g=int((b-f+1)/3) h=((19*a+b-d-g+15)%30) i=int(c/4) k=c%4 L=((32+2*e+2*i-h-k)%7) m=int(a+11*h+22*L)/451 mes=int((h+L-7*m+114)/31) if mes==1 : mes='Janeiro' elif mes==2 : mes='Fevereiro' elif mes==3 : mes='Março' elif mes==4 : mes='Abril' elif mes==5 : mes='Maio' elif mes==6 : mes='Junho' elif mes==7 : mes='Julho' elif mes ==8 : mes ='Agosto' elif mes ==9 : mes ='Setembro' elif mes ==10 : mes ='Outubro' elif mes ==11 : mes ='Novembro' else : mes ='Dezembro' mes1=mes dia=((h+L-7*m+114)%31)+1 if anoatual>ano : print "A pascoa caiu no dia: %s."% dia print "Do mês: %s" %mes1 else : print "A pascoa ira cair no dia: %s."% dia print "Do mês: %s" %mes1
Melhorando o tempo de boot do Fedora e outras distribuições
Como instalar as extensões Dash To Dock e Hide Top Bar no Gnome 45/46
E a guerra contra bots continua
Tradução do artigo do filósofo Gottfried Wilhelm Leibniz sobre o sistema binário
Conheça o firewall OpenGFW, uma implementação do (Great Firewall of China).
Instalando o FreeOffice no LMDE 6
Anki: Remover Tags de Estilo HTML de Todas as Cartas
Colocando uma opção de redimensionamento de imagem no menu de contexto do KDE
Não consigo acessar os modos de desempenho (2)
Ubuntu — tentando iniciar o windows? (0)
[Shell Script] Script para desinstalar pacotes desnecessários no OpenSuse
[Shell Script] Script para criar certificados de forma automatizada no OpenVpn
[Shell Script] Conversor de vídeo com opção de legenda
[C/C++] BRT - Bulk Renaming Tool
[Shell Script] Criação de Usuarios , Grupo e instalação do servidor de arquivos samba