Với đoạn mã sau, nếu n=13, trong các phần tử được bổ sung vào Stack theo thứ tự:While n0 do beginR:=n mod 2; Push(R); n:=n div 2; end;

Với đoạn mã sau, nếu n=13, trong các phần tử được bổ sung vào Stack theo thứ tự:

While n<>0 do begin

R:=n mod 2; Push(R); n:=n div 2; end;