program jjj;
uses crt;
var n:integer;
y:real;
BEGIN clrscr;
writeln('VVedite mecacz n');
readln(n);
y:=(n mod 12)+1;
writeln(y:7:0);
readln;
END .