program A; uses crt; var c,b,d:integer; F:file; begin clrscr; assign (F,'count.in'); reset (F); seek (F,0); readln (c); seek (F,1); readln (b); close (F); writeln (' ',b); readln; end.