algoritmo "Multiplicacao"
var
conti,n1,n2,multiplicacao:inteiro
inicio
multiplicacao<-0
conti<-0
escreva("Digite o numero:")
leia (n1)
escreva("Multplicado por:")
leia (n2)
Repita
multiplicacao<-multiplicacao+n1
conti<-conti+1
ate (conti=n2)
escreval(n1,"x",n2,"=",multiplicacao)
fimalgoritmo
Nenhum comentário:
Postar um comentário