Определите, какое число будет напечатано на экране в результате выполнения следующей программы:

var a, b: integer;
begin
a := 0; b := 2;
while b < 32 do
begin
a := a+1;
b := b * 2;
end;
writeln(a);
end.