Matriz unidimensional de cadeias
algoritmo ()
{
matriz cadeia j[5]; // declara um vetor do tipo cadeia
inteiro i;
// recebendo os elementos
i := 1;
enquanto ( i <= 5 )
{
leia ( "informe valor: ", j[i] );
i := i + 1;
}
// exibindo os elementos
i := 1;
enquanto ( i <= 5 )
{
escreva ( "valor informado: ", j[i] );
i := i + 1;
}
}