Определите, что будет напечатано в результате работы следующей программы. Текст программы приведён на пяти языках программирования. var s,k: integer; begin s:=2 for k:=1 to 3 do s:=s*s writeln(s); end. C обьяснением

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

var s : integer := 2;

begin

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

   writeln(s);

end.

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

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

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