segunda-feira, 1 de novembro de 2010

3)Faça um programa que, dado um número, imprima a sua tabuada completa

algoritmo "Tabuada"
var
  i,n,resultado : inteiro

inicio
  escreval("Digite o numero da tabuada")
  leia(n)
  para i de i ate 10 faca
  resultado <- n*i
  escreval(n,"x",i,"=",resultado)
  fimpara
 
fimalgoritmo

Nenhum comentário:

Postar um comentário