Ano bissexto em assembly
Publicado por Leonardo Weslei Diniz 11/12/2007
[ Hits: 20.592 ]
Homepage: http://www.agilesoft.com.br/
Ano bissexto em assembly.
Obs:programa fácil de entender, tem comentário em tudo.
.data str1: .asciiz "\n\tDigite o ano: " str2: .asciiz "\n\tAno BISSEXTO!!!" str3: .asciiz "\n\tAno COMUM!!!" str4: .asciiz "\n\tDigite:\n\t0(zero) para sair:\n\t1(um)para manual\n\t2(dois)para calcular ano bissexto\n\t" strman: .asciiz "\n\tAno bissexto o ano que possui um dia a mais do que os anos comuns (vulgares).\n\tO objetivo e manter o calendario utilizado em sincronia com os eventos sa_\n\tzonais relacionados as estacões do ano. No caso do calendario gregoriano, \n\tha a insercao de 1 dia extra a cada 4 anos no mes de fevereiro, que passa \n\ta ter 29 dias (ano com 366 dias) ao inves de 28 como nos anos comuns de 365\n\tdias. Diferentemente do que o senso comum nos leva a crer, o dia extra do a_\n\tno bissexto nao e o 29 e sim o 24 do mes de fevereiro. Para concluir se um\n\t ano e bissexto basta ser verificada a condicao do ano ser divisivel por 400\n\t(o resto da divisao do ano por 400 e zero), ou no caso de essa condicao ser\n\tfalsa, o ano ser divisivel por 4 mas nao por 100.\n\t\tfonte:\"http://pt.wikipedia.org/wiki/Ano_bissexto\"\n\tEste programinha foi desenvolvido para verificar se e ano bissexto a partir\n\tde um numero dado pelo usuario\n\n\t\tDivirta-se!!!\n\n\t\tCreditos:Leonardo Weslei Diniz\n\n\t\tEmail:exterminador3@gmail.com\n\n\t\tCurso:Ciencia da Computacao-Fic(Faculdades Integradas de Caratinga)-2 periodo\n\n\t\t" str5: .asciiz "\n\t+------------------------------------------------------------------------------------------+\n\t" .text .globl main. #main() main: #{ j menu #menu() comeca: #comeca: li $v0,4 #mostra qual operacao vai fazer no caso printf la $a0,str1 #coloca a string str1 em $a0 syscall #chama o SO(sistema operacional) para fazer printf("%s",$a0) li $v0,5 #mostra qual operacao vai fazer syscall #chama o SO(sistema operacional) para fazer scanf("%d",$s1) addi $s1,$v0,0 #scanf("%d",&ano); addi $t1,$zero,4 #$t0=4; div $s1,$t1 #ano%4; mfhi $s1 #ano=ano%4; addi $t2,$zero,1 #$t2=1; beq $s1,$t2,else #if($s1 == $t1)goto else; addi $t2,$zero,2 #$t2=2; beq $s1,$t2,else #if($s1 == $t1)goto else; addi $t2,$zero,3 #$t2=3; beq $s1,$t2,else #if($s1 == $t1)goto else; li $v0,4 #mostra qual operacao vai fazer no caso printf la $a0,str2 #coloca a string str2 em $a0 syscall #chama o SO(sistema operacional) para fazer printf("%s",$a0) j menu #menu(); else: #else: li $v0,4 #mostra qual operacao vai fazer no caso printf la $a0,str3 #coloca a string str3 em $a0 syscall #chama o SO(sistema operacional) para fazer printf("%s",$a0) acabou: #acabou: jr $ra #} #--------------------------------------------------------------------------------- # funcaozinhas bobas #--------------------------------------------------------------------------------- menu: #menu(){ li $v0,4 #mostra qual operacao vai fazer no caso printf la $a0,str4 #coloca a string str4 em $a0 syscall #chama o SO(sistema operacional) para fazer printf("%s",$a0) li $v0,5 #mostra qual operacao vai fazer no caso scanf syscall #chama o SO(sistema operacional) para fazer scanf("%d",$s1) addi $s1,$v0,0 #scanf("%d",&ano); addi $t1,$zero,2 #$t2=2 beq $s1,$t1,comeca #if($s1 == $t1)goto comeca; addi $t1,$zero,1 #$t2=1 beq $s1,$t1,manual #if($s1==$t1)manual(); bne $s1,$t1,acabou #if($s1 != $t1)goto acabou;} #---------------------------------------------------------------------------------- manual: #manual(){ li $v0,4 #mostra qual operacao vai fazer no caso printf la $a0,str5 #coloca a string str5 em $a0 syscall #chama o SO(sistema operacional) para fazer printf("%s",$a0) li $v0,4 #mostra qual operacao vai fazer no caso printf la $a0,strman #coloca a string strman em $a0 syscall #chama o SO(sistema operacional) para fazer printf("%s",$a0) li $v0,4 #mostra qual operacao vai fazer no caso printf la $a0,str5 #coloca a string str5 em $a0 syscall #chama o SO(sistema operacional) para fazer printf("%s",$a0) j menu #menu();}
Escrita de número em binário em Assembly Puro para Linux 64 bits (Nasm - Netwide Assembler)
Retorna o maior e menor elemento de um vetor em Assembly
Servidor de Backup com Ubuntu Server 24.04 LTS, RAID e Duplicati (Dell PowerEdge T420)
Visualizar câmeras IP ONVIF no Linux sem necessidade de instalar aplicativos
Atualizar Debian Online de uma Versão para outra
Instalar driver Nvidia no Debian 13
Redimensionando, espelhando, convertendo e rotacionando imagens com script
Debian 13 Trixie para Iniciantes
Convertendo pacotes DEB que usam ZSTD (Padrão Novo) para XZ (Padrão Antigo)
baschrc customizado pegeui vários. (2)
Rust é o "C da nossa geração"? (8)