Запишите число, которое будет напечатано в результате выполнения следующей программы.
var n, s: integer;
begin
n := 1;
s := 0;
while s <= 365 do begin
s := s + 36;
n := n * 2
end;
write\(n\)
end.