program ideone;
var n, i, rs, z :integer;
begin
rs := 5;
n:= 7;
i := 0;
while (i<n) do begin
// writeln(rs);
rs := rs+2+rs;
i:=i+1;
end;
writeln("raspuns: ",rs);
(* your code goes here *)
end.
ICAgIHByb2dyYW0gaWRlb25lOwogICAgdmFyIG4sIGksIHJzLCB6IDppbnRlZ2VyOwogICAgYmVnaW4KICAgcnMgOj0gNTsKICAgbjo9IDc7CiAgICBpIDo9IDA7CiAgCiAgICB3aGlsZSAoaTxuKSBkbyBiZWdpbgogIC8vIHdyaXRlbG4ocnMpOwogICAgCXJzIDo9IHJzKzIrcnM7CiAgICAJCiAgICBpOj1pKzE7CiAgICBlbmQ7CiAgICB3cml0ZWxuKCJyYXNwdW5zOiAiLHJzKTsKICAgIAkoKiB5b3VyIGNvZGUgZ29lcyBoZXJlICopCiAgICBlbmQu