%RANGECHECKS ON
PROGRAM RNGCHKS(INPUT,OUTPUT);
VAR I,J:INTEGER;
BEGIN
READ(I);
WRITELN('I=',I);
END.