Result

AC

Duration

500ms

Code [DL]

let rec f?(a=input_line stdin)x=print_char(if a<x then '1'else '0');f(min a x);;f"a"

stdin

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

stdout

11010000000000000000000000000000000000000001000000

stderr

Exception: End_of_file.

strace

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 +++