//3.19. Escreva um algoritmo que leia um número e informe se ele é
//divisível por 10, por 5 ou por 2 ou se não é divisível por
//nenhum deles.
Algoritmo "EXERCICIO 3.19"
// Disciplina : ALGORITMOS
// Professor : ANGELO DA CUNHA SÁ
// Descrição : Aqui você descreve o que o programa faz! (função)
// Autor(a) : Nome do(a) aluno(a)
// Data atual : 07/09/2016
Var
// Seção de Declarações das variáveis
Num:inteiro
AUX1,AUX2,AUX3:INTEIRO
Inicio
// Seção de Comandos, procedimento, funções, operadores, etc...
ESCREVAL("DIGITE UM NUMERO::")
LEIA(NUM)
AUX1<-NUM MOD 10
AUX2<-NUM MOD 5
AUX3<-NUM MOD 2
SE ((AUX1=0) OU (AUX2=0) OU (AUX3=0))ENTAO
SE (NUM MOD 10)=0 ENTAO
ESCREVAL("NUMERO DIVISIVEL POR 10")
FIMSE
SE (NUM MOD 5)=0 ENTAO
ESCREVAL("NUMERO DIVISIVEL POR 5")
FIMSE
SE (NUM MOD 2)=0 ENTAO
ESCREVAL("NUMERO DIVISIVEL POR 2")
FIMSE
SENAO
ESCREVAL("NUMERO NÃO É DIVISÍVEL POR NENHUM DELES")
FIMSE
Fimalgoritmo
Nenhum comentário:
Postar um comentário
Obrigado! Em breve publicaremos seu comentário