Question

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

Answer 1

K:=1. S:=2*2=4.

K:=2. S:=4*4=16.

K:=3. S:=16*16=256.

Ответ:256