local s = io.read()
local k = io.read("*n")
local t = {}
local left = 1
for i = 2, #s do
  if s:byte(i) ~= s:byte(left) then
    table.insert(t, i - left)
    left = i
  end
end
table.insert(t, #s + 1 - left)
if #t == 1 then
  local tot = k * #s
  print(tot // 2)
elseif s:byte(1, 1) == s:byte(#s, #s) then
  local first = t[1]
  local last = t[#t]
  local ret = 0
  for i = 2, #t - 1 do
    ret = ret + t[i] // 2
  end
  ret = ret * k + first // 2 + last // 2
  ret = ret + ((first + last) // 2) * (k - 1)
  print(ret)
else
  local ret = 0
  for i = 1, #t do
    ret = ret + t[i] // 2
  end
  print(ret * k)
end
