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