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

привел программу к более красивому и правильному виду :)

var s : integer := 2;

begin

for var k := 1 to 3 do s *= s;

writeln(s);

end.

тут трижды S умножается сама на себя а затем результат сам на себя. Получается следующая математическая формула:

$((s^{2})^{2})^{2}=((2^{2})^{2})^{2}=(4^{2})^{2}=16^{2}=256$

на паскале это можно записать как:

writeln(sqr(sqr(sqr(s))));