{ %OPT=-O3 } { %norun } var a : integer; begin write(a = a in[a in[a], a / 0 > a]) end.