%DIAGLINEMAP=YES
%DIAGNAMETABLE=NO
PROGRAM DIAGS(INPUT,OUTPUT);
VAR I,J:INTEGER;
BEGIN
READ(I);
WRITELN('I=',I);
END.