Pular para o conteúdo

Algoritmo para calcular a tabuada

Algoritmo simples que solicita um número e calcula a tabuada deste.
Rodrigo Zanuzzo rodrigozanuzzo
Hits: 29.970 Categoria: Outros Subcategoria: Portugol
  • Download
  • Nova versão
  • Indicar
  • Denunciar

Descrição

Algoritmo simples que solicita um número e calcula a tabuada deste.
Download tabuada.alg Enviar nova versão

Esconder código-fonte

algoritmo "tabuada"
// Função :Solicita um numero e calcula a tabuada deste numero
// Autor :Rodrigo Zanuzzo
// Data : 9/6/2010
var
n,calc:inteiro
inicio
leia "Digite um numero para a tabuada",n
calc<-n*0
escreva n," X 0 =",calc
calc<-n*1
escreva n," X 1 =",calc
calc<-n*2
escreva n," X 2 =",calc
calc<-n*3
escreva n," X 3 =",calc
calc<-n*4
escreva n," X 4 =",calc
calc<-n*5
escreva n," X 5 =",calc
calc<-n*6
escreva n," X 6 =",calc
calc<-n*7
escreva n," X 7 =",calc
calc<-n*8
escreva n," X 8 =",calc
calc<-n*9
escreva n," X 9 =",calc
calc<-n*10
escreva n," X 10 =",calc
fimalgoritmo

CobWeb Plot em Octave

Script em Bath "DOS" para Upload e Download de arquivos usando o SSH

Octave - Sistemas lineares por Gauss-Seidel

Octave - Calcular raiz pelo método de Newton

Octave - Decomposição LU

#1 Comentário enviado por landex em 10/06/2010 - 08:31h
Bem Legal este algoritmo. Muito Bom cara.
#2 Comentário enviado por eldermarco em 10/06/2010 - 11:51h
Mas eu não poderia criar um laço indo de 0 a 10 que deixaria a coisa mais clara e pouco repetitiva no código? Não sei a lógica desse pseudo-código, mas acho que dá pra entender o que está abaixo:

----------------------------------------------------------------------
para i igual a 0; i menor ou igual a 10; incremente i; faça:
...calc<-n*i
...escreva n," X", escreva i, " = ",calc
pronto
-----------------------------------------------------------------------

Esses "..." não existem, é só para ficar clara a indentação.

Isso reduziria o tamanho do código e deixaria a coisa mais elegante, creio.
#3 Comentário enviado por gpr.ppg.br em 17/02/2011 - 01:58h
usando linux e o programa portugol 2.3
não funciona :-(

mas deve funcionar no visualg.

Contribuir com comentário

Entre na sua conta para comentar.