var a : integer;
begin
a := Dec(a);
end.