Определите значение переменной S после выполнения алгоритма:
Var s,k: integer;
Begin
S := 7;
FOR k := 11 to 14 do
S := S * 2;
Writeln (`S=`, S);
End.