begin
var a: array [0..99] of integer;
var i, k: integer;
write('[ ');
for i := 0 to 99 do
begin
a[i] := random(64);
write(a[i], ' ');
end;
writeln(']');
for i := 0 to 49 do
begin
k := a[i];
a[i] := a[99 - i];
a[99 - i] := k;
end;
write('[ ');
for i := 0 to 99 do
write(a[i], ' ');
writeln(']');
end.