Hidden driver miniblogs

Tas ir pseidokods? Vienkārši sakot- the fuck is this language.
Vai arī tā ir kaut kāda procedūra linked listiem.
un L2 elementus pārkopē L1 saraksta beigās. (vismaz tā domāju)

Ko dara šī operācija?

procedure Op(var MS: ManaStruktura; var E: StdElement);
begin
if not Empty(MS) then begin
E := MS^.el[MS^.head];
MS^.head = MS^.head mod MaxSize + 1;
Dec(MS^.n);
end;
end;
Izvēlieties vienu:
a. Izņem elementu no vektoriālajā formā attēlotā steka
b. Izņem elementu no cirkulārās rindas
c. Izņem elementu no saistītajā formā attēlotā steka
d. Izņem elementu no saistītajā formā attēlotās rindas
e. Izņem elementu no vektoriālajā formā attēlotās rindas

Un šito vel nezinu
Ko izvadīs šāds koda gabals?

var
S1, S2: Stack;
...
begin
...
Create(S1);
Create(S2);
S := 0;
for i := 1 to 100 do begin
E.key := i;
Push(S1, E);
end;
for i := 50 to 100 do begin
Pop(S1, E);
Push(S2, E);
end;
for i := 90 to 100 do begin
Pop(S2, E);
S := S + E.key;
end;
Writeln(S);
...

[ code ] tags ir pārāk mainstream [ /code ]