assign(input,'clock.dat');
reset(input);
assign(output,'clock.sol');
rewrite(output);



close(input);
close(output);