Какое значение переменной а будет выведено на экран оператором writeln (а) в результате выполнения следующей программы? var a, n: integer; begin n: =50; a: =0; while n > 1 do begin n: =n div 2; a: =a+1; end; writeln (a) end.