program main
implicit none
integer:: i,ind,oc
integer(8):: k, ans
character(101):: rs
character(:), allocatable:: s
integer, allocatable:: counter(:)
character(1):: cfirst, cend, currentchar, os

read*, rs,k
allocate(character(len_trim(rs)):: s)
s = trim(rs)
! print*, len(s)
allocate(counter(len(s)))
cfirst = s(1:1)
cend = s(len(s):len(s))
ind = 0
counter(1:len(s)) = 0
currentchar = '0'
do i=2, len(s)
    os = s(i-1:i-1)
    if (.not. os == s(i:i)) exit
    if (i==len(s))then
        print*, ceiling(real(len(s)*k)/2.)
        stop
    endif
    
end do





do i=1, len(s)
    if(currentchar == s(i:i))then
        ! print*, '#1-1'
        counter(ind) = counter(ind) + 1
    else
        ! print*, '#1-2'
        currentchar = s(i:i)
        ind = ind + 1
        counter(ind) = counter(ind) + 1
    end if
    ! print*, counter
end do

ans = sum(counter(1:len(s))/2)
! print*, counter 
if (cfirst == cend)then
    oc = counter(1)
    counter(ind) = counter(ind) + counter(1)
    counter(1) = counter(1) - oc
end if

ans = ans + sum(counter(1:len(s))/2)*(k-1)
! print*, counter 

print*, ans
end program