Program P63;
type Zi=(L, Ma, Mi, J, V, S, D);
var z : Zi;
begin
 for z:=L to S do writeln(ord(z));
 readln;
 for z:=D downto Ma do writeln(ord(z));
 readln;
end.