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

var s, n: integer;
begin
s := 49;
n := 1;
while s > 0 do begin
s := s - 8;
n := n * 2;
end;
writeln\(n\)
еnd.