Question

Faça um programa para verificar se um determinado numero inteiro é divisível poe 3 ou 5mas não simultaneamente pelos dois.

Answer 1

algoritmo "semnome"var
i1: inteiroinicioEscreval("Qual é o numero?")Leia(i1)Se (i1%3 = 0) entao   Escreval("O numero é divisivel por 3")FIMSEfimalgoritmo

Answer 2

Algoritmo "Semnome"


var
N1:Inteiro
Inicio:
Escreval("Digite um número")
Leia(N1)
     Se (N1%3 = 0) entao
     Escreval(N1, " é divisivel por 3")
     Fimse
     Se (N1%5 = 0) entao
     Escreval(N1, " é divisivel por 5")
     Fimse
     Se(N1%3) e (N1%5) entao
     Escreval(N1, " é divisivel por 3 e 5") 
Fimalgoritmo