program p;
var
  l : longint;
begin
  p.l:=1;
end.