Question

Escreva um algoritmo, para o VisuAlg, que leia quatro números inteiros e diga

quais são divisíveis por 6. Usar a estrutura de decisão simples.

Answer 1

algoritmo "divisiveis por 6"
var
n1,n2,n3,n4:inteiro
inicio
leia (n1,n2,n3,n4)
se n1 mod 6 = 0 entao
escreva(n1)
se n2 mod 6 = 0 entao
escreva(n2)
se n3 mod 6 = 0 entao
escreva(n3)
se n4 mod 6 = 0 entao
escreva(n4)
se n5 mod 6 = 0 entao
escreva(n5)
se n6 mod 6 = 0 entao
escreva(n6)
escreval ("São números divisiveis por 6")
fimalgoritmo.