Problema: Escreva um programa em Portugol que calcule a soma dos 20 primeiros números inteiros, exibindo uma sequência como se segue:
0 + 1 = 1
0 + 1 + 2 = 3
0 + 1 + 2 + 3 = 6
…
1 2 3 4 5 6 7 8 9 10 11 12 13 14 |
algoritmo "SOMAR SEQUÊNCIA" var i, soma: inteiro result: caractere inicio soma <- 0 result <- "0" para i de 0 ate 18 passo 1 faca result <- result + " + " + numpcarac(i+1) soma <- soma+i+1 escreval(result, " = ", soma) fimpara fimalgoritmo |
Resultado:

*Atualizado em 9 de janeiro de 2021