
PROGRAM Date (Input,Output);

VAR
   Day, Month, Year : Integer;

BEGIN
   Writeln('Enter the day, month, and year as integers:');
   Readln(Day,Month,Year);
   Year := Year MOD 100;
   Writeln(Day:2,'/',Month:2,'/',Year);
END.


















