tex matriu

n-x=1;
n-y=(-1);
i=1;
array-x[1][1]=scan-tex-positiu();
while( array-x[1][1] == [ \begin{array} ] ; array-x[i][j] != [ \end{array} ] ; i++ )
{
si i == 1 ==>
{
tamany-x[1]=scan-tex-positiu();
while( tamany-x[1] == [ { ] ; tamany-x[k] != [ } ] ; k++ )
{
tamany-x[k]=scan-tex-positiu();
n-x++;
}
tamany-y[(-1)]=scan-tex-negatiu();
while( tamany-y[(-1)] == [ } ] ; tamany-y[k] != [ { ] ; k-- )
{
tamany-y[k]=scan-tex-negatiu();
n-y--;
}
}
avanç-text-positiu(n-x);
for( j=1 ; j [< n-x ; j++ )
{
int array-x[i][j];
array-x[i][j]=scan-tex-positiu();
}
for( j=(-1) ; j >] n-y ; j-- )
{
int array-x[i][j];
array-x[i][j]=scan-tex-negatiu();
}
}


n-x=1;
n-y=(-1);
i=(-1);
array-x[(-1)][(-1)]=scan-tex-negatiu();
while( array-y[(-1)][(-1)] == [ \begin{dual-array} ] ; array-y[i][j] != [ \end{dual-array} ] ; i-- )
{
si i == (-1) ==>
{
tamany-x[1]=scan-tex-positiu();
while( tamany-x[1] == [ { ] ; tamany-x[k] != [ } ] ; k++ )
{
tamany-x[k]=scan-tex-positiu();
n-x++;
}
tamany-y[(-1)]=scan-tex-negatiu();
while( tamany-y[(-1)] == [ } ] ; tamany-y[k] != [ { ] ; k-- )
{
tamany-y[k]=scan-tex-negatiu();
n-y--;
}
}
avanç-text-negatiu(n-y);
for( j=(-1) ; j >] n-y ; j-- )
{
int array-y[i][j];
array-y[i][j]=scan-tex-negatiu();
}
for( j=1 ; j [< n-x ; j++ )
{
int array-y[i][j];
array-y[i][j]=scan-tex-positiu();
}
}