terça-feira, 20 de setembro de 2016

3.19 - divisível por 10, por 5 ou por 2

//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