procedure main() every write(a:=0to 127," ",b:=0to 127,":",a+b=ior(a,b)) end