var a:array[0..60000] of integer;
 a,b:integer;
 f1,f2:text;
 begin
 assign(f1, 'input.dat');
 reset(f1);
 readln (f1,a);
 readln (f1,b);
 writeln(b);
 close (f1);
 assign (f2, 'output.sol');
 rewrite (f2);
 writeln(f2,s);
 close (f2);
 end.