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