С решением и объяснением!3. Определите, что будет написано в итоге работы последующей

С решением и объяснением!
3. Обусловьте, что будет написано в итоге работы следующей программы. Текст программки приведён на трёх языках программирования. Var s, k: integer;
Begin
s := 1;
for k := 0 to 4 do
s := s*3;
write (s);
End.