Задание

Запишите зна­че­ние переменной s, по­лу­чен­ное в ре­зуль­та­те работы сле­ду­ю­щей программы.
Var s,k: integer;
Begin
s := 1;
for k := 2 to 5 do
s := s*3;
writeln\(s\);
End.