I paste below a simple code illustrating what I want to create: two lists from a set with pairs. I wonder it is a very simple task but I my lists aren't create in the end.

> restart;

>

> lista:=[[1,10],[2,20],[3,30]]:

> x:=[]:

> y:=[]:

>

> for i from 1 to nops(lista) do

> for j from 1 to 2 do

>

> if j = 1 then

> x[i,j]:=op(1,op(i,lista));

> fi;

> if j = 2 then

> y[i,j]:=op(2,op(i,lista));

> fi;

> od;

> od;

>

> x;

> y;

In resume then after the for loop is terminated I want to be left with two lists:

x:= [1,2,3] and y:=[10,20,30]. I'm sure it has a quick fix but I'm stuck and would appreciate any help/advice.

Thanks in advance!