System Binarny

read 1 jzero D load 1 B: jzero C div =2 store 2 mult =-2 add 1 jzero A write =1 load 2 store 1 jump B A: write =0 load 2 store 1 jump B C: halt D: write 0