Skip to main content
Pergunta protegida por Largato
Foi adicionado mais uma tag pois a questão está relacionada a linguagem Portugol.
Link
Fonte Link
Tejota
  • 57
  • 1
  • 10

visualg escada quebra de linha

Estou com problema no código para fazer a quebra de linha. Preciso criar uma escada que fique como abaixo:

    #
   ##
  ###
 ####
#####

Se eu colocar escreval("#") ele quebra a linha, porem o resultado final fica assim:

     #
    #
#
   #
#
#
  #
#
#
#
 #
#
#
#
#

Alguém sabe qual ajuste devo realizar ? com o código atual o resultado está ficando dessa maneira:

Quantidade de degraus: 5
     #    ##   ###  #### #####

Algoritmo "escada"
Var
p, x1, x, lin, col, degr: inteiro

Inicio
Escreva ("Quantidade de degraus: ")
Leia (degr)
x:=degr
x1:=1
Para lin de 1 ate degr passo 1 faca
Para col de 1 ate x passo 1 faca
escreva(" ")
Fimpara
x:=x-1
Para p de 1 ate x1 passo 1 faca
escreva("#")
Fimpara
x1:=x1+1
escreva( )
Fimpara
fimalgoritmo

desde já muito obrigado !!