Observe o algoritmo da figura.

algoritmo "ION_NIT_MATRIZ"
var
  MT : vetor[1..5,1..5] de inteiro
  X,Y : inteiro
inicio
  para X de 1 ate 5 faca
     para Y de 1 ate X faca
        se ((Y=1) ou (X=Y)) entao
           MT[X,Y] <- 1
        senao
           MT[X,Y] <- MT[X-1,Y] + MT[X-1,Y-1]
        fimse
     fimpara
  fimpara
  para X de 1 ate 5 faca
     para Y de 1 ate X faca
        escreva(MT[X,Y]:3)
     fimpara
     escreval
  fimpara
fimalgoritmo

A execução desse algoritmo irá gerar como saída a matriz indicada na seguinte opção: