VisualG Algoritmo para gerar Tabuada

[gustavobmth1993]

Galera, estou tentando fazer um programa que peça um numero qualquer entre 1 e 10 e faça a tabuada

 

Este é meu código:

algoritmo "tabuada"
var
i,num:inteiro
inicio
escreva("escreva um numero de 1 a 10: ")
leia(num)
para i de 0 ate 10 faca
escreva (num "x" i"=" i*num)

fimpara
fimalgoritmo

 

Porém tem um erro na linha "escreva (num "x" i"=" i*num)''

Poderiam me ajudar?

[Simon Viegas]

Olá @Delmar Quispe.
 

Em 20/11/2017 às 19:05, Delmar Quispe disse:

Porém tem um erro na linha "escreva (num "x" i"=" i*num)''

Poderiam me ajudar?

 

É necessário separar os elementos utilizando ",". Ex.:

  escreva (num,"x",i,"=",i*num)

 

 

PS: é recomendado sempre manter o código indentado. Para ajudar, pressione CTRL+G no Visualg.

PS2: para postar um código no fórum, favor ler e seguir orientações em tópico Poste seus códigos corretamente! contido no topo do fórum.

 

No aguardo.

[Ikkyy]

algoritmo "tabuada"
var
   i,num:inteiro
inicio
   escreva("escreva um numero de 1 a 10: ")
   leia(num)
   para i de 0 ate 10 faca
      escreval (num," x",i," =",i*num)
   fimpara
fimalgoritmo

Tentei ajudar e incrementar um pouco..

 

com o escreval fica melhor organizado um resultado por linha, facilitando a leitura do resultado.

dentro das strings " " foi adicionado um espaço para alinhar.

[JOTAFBR]

algoritmo "Tabuada do 1 ao 10"
// Função :
// Autor :
// Data : 09/10/2023
var
   i,j:inteiro
inicio
   EscrevaL("Tabuada geral")
   EscrevaL("")

   Para i de 1 ate 10 faca
      Para j de 0 ate 10 faca
         EscrevaL(i ," x ", j ," = ", j * i)
      fimpara
      EscrevaL(" ")
      Escreval("--------")
   fimpara
fimalgoritmo

[devair1010]

@JOTAFBR      muito bem , seu código funciona bem ,  e você poderia dar uma melhor apresentação de saída no console :

algoritmo "Tabuada do 1 ao 10"
// Data : 09/10/2023
var
   i,j:inteiro
inicio
   EscrevaL("Tabuada geral")
   EscrevaL("")

   Para i de 1 ate 10 faca
      escreval("")
      Escreval("  Tabuada de",i)
      escreval("")
      Para j de 0 ate 10 faca
         se i < 10 então
            Escreva(" ")
         fimse
         Escreva( i ," x")
         se j < 10 então
            escreva(" ")
         fimse
         escreva( j," =" )
         se j*i < 10 então
            escreva("  ")
         senao
            se j*i < 100 então
               escreva(" ")
            fimse
         fimse
         escreval( j * i)
      fimpara
   fimpara
   EscrevaL(" ")
   EscrevaL(" ")

fimalgoritmo

 

[Simon Viegas]

@devair1010, dá para simplificar simplesmente formatando os números. Exemplo:

 

algoritmo "Tabuada do 1 ao 10"
// Data : 13/10/2023
var
   i,j : inteiro
inicio
   escrevaL("Tabuada geral")
   escrevaL("")

   para i de 1 ate 10 faca
      escrevaL("")
      escrevaL("  Tabuada de ", i:1)
      escrevaL("")

      para j de 0 ate 10 faca
         escreva (i:2," x ", j:2, " = ")
         escrevaL(j*i:3)
      fimPara
   fimPara

   escrevaL(" ")
   escrevaL(" ")
fimAlgoritmo