by@dnek_
AC
500ms
let rec f?(a=input_line stdin)x=print_char(if a<x then '1'else '0');f(min a x);;f"a"
56 48 55 14 71 20 94 99 61 72 36 35 85 65 18 50 78 37 16 47 90 68 77 58 31 54 29 70 83 60 96 98 52 24 53 28 81 79 32 42 41 57 45 11 22 62 82 64 93 13
11010000000000000000000000000000000000000001000000
Exception: End_of_file.
10 execve("/bin/sh", ["/bin/sh", "/root/script", "/volume/CODE"], 0x7ffc4be2e370 /* 7 vars */) = 0 11 execve("/bin/cat", ["cat", "-"], 0x55ddae1edd30 /* 7 vars */ <unfinished ...> 12 execve("/usr/bin/ocaml", ["/usr/bin/ocaml", "/volume/CODE"], 0x55ddae1edd40 /* 7 vars */ <unfinished ...> 11 <... execve resumed>) = 0 12 <... execve resumed>) = 0 11 +++ exited with 0 +++ 10 --- SIGCHLD {si_signo=SIGCHLD, si_code=CLD_EXITED, si_pid=11, si_uid=0, si_status=0, si_utime=0, si_stime=0} --- 12 +++ exited with 2 +++ 10 --- SIGCHLD {si_signo=SIGCHLD, si_code=CLD_EXITED, si_pid=12, si_uid=0, si_status=2, si_utime=2, si_stime=0} --- 10 +++ exited with 2 +++