Задание

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

var s, n: integer;

begin

s := 41;

n := 2;

while s > 0 do begin

s := s - 12;

n := n * 3;

end;

writeln(n)

еnd.