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

var s, n: integer;
begin
s := 0;
n := 1;
while s < 100 do
begin
s := s + 20;
n := n * 3;
end;
writeln\(n\)
end.