5 de dez. de 2016

algoritmo "Multiplos de 10"

23) Faça um algoritmo que conte de 1 a 100 e a cada múltiplo de 10 emita uma mensagem:“Múltiplo de 10”.

algoritmo "Multiplos de 10"
var
n: vetor[1..100] de inteiro
i: inteiro
inicio
escreval("Os multiplos de 10 de 1 a 100 são:")
para i de 1 ate 100 faca
se(i mod 10 = 0) entao
escreval(i)
fimse
fimpara
fimalgoritmo