Задание

Запишите значение переменной s, полученное в результате работы следующей программы.
var s,n: integer;
begin
s := 0;
for n := 2 to 5 do
s := s * 3;
writeln\(s\);
end.