PROGRAM Constant1(Input, Output);
    CONST
        MAX = 1000;
        MIN = -MAX;     { sign before Constant Identifier }
BEGIN
    WriteLn('MAX = ', MAX);
    WriteLn('MIN = ', MIN);
    WriteLn('MIN*2 = ', MIN*2);
END.
