import java.io.{BufferedOutputStream, BufferedReader, InputStreamReader, PrintWriter}
import java.lang

import scala.annotation.tailrec
import scala.collection.mutable.ArrayBuffer
import scala.reflect.ClassTag

object Main {
  val DEBUG = false

  def log(message: => String): Unit = {
    if (DEBUG) {
      Console.err.println(message)
    }
  }

  def debug(closure: => Unit): Unit = {
    if (DEBUG) {
      closure
    }
  }

  def get[T: ClassTag](implicit in: BufferedReader, converter: String => T): T = {
    converter(in.readLine)
  }

  def getArray[T: ClassTag](implicit in: BufferedReader, converter: String => T): Array[T] = {
    get[String].split("\\s+").map[T](converter)
  }

  implicit val idConverter: String => String = s => s
  implicit val intConverter: String => Int = s => Integer.parseInt(s)
  implicit val longConverter: String => Long = s => lang.Long.parseLong(s)

  def get[T1, T2](
                   implicit in: BufferedReader,
                   converter1: String => T1,
                   converter2: String => T2
                 ): (T1, T2) = {
    getArray[String] match {
      case Array(v1, v2) => (converter1(v1), converter2(v2))
    }
  }

  def get[T1, T2, T3](
                       implicit in: BufferedReader,
                       converter1: String => T1,
                       converter2: String => T2,
                       converter3: String => T3
                     ): (T1, T2, T3) = {
    getArray[String] match {
      case Array(v1, v2, v3) => (converter1(v1), converter2(v2), converter3(v3))
    }
  }

  def get[T1, T2, T3, T4](
                           implicit in: BufferedReader,
                           converter1: String => T1,
                           converter2: String => T2,
                           converter3: String => T3,
                           converter4: String => T4
                         ): (T1, T2, T3, T4) = {
    getArray[String] match {
      case Array(v1, v2, v3, v4) => (converter1(v1), converter2(v2), converter3(v3), converter4(v4))
    }
  }

  implicit class TimesInt(val n: Int) {
    def times(f: Int => Unit): Unit = {
      for (i <- 0 until n) {
        f(i)
      }
    }
  }

  def primes(n: Long): ArrayBuffer[Long] = {
    val buf = ArrayBuffer.empty[Long]
    val s = Math.sqrt(n).toInt

    var v = n
    for (i <- 2 to s) {
      if (v == 1 || v == 0) {
        return buf
      } else {
        while (v % i == 0) {
          buf.append(i)
          v /= i
        }
      }
    }
    if (v > s) {
      buf.append(v)
    }
    buf
  }

  def divisors(n: Int): ArrayBuffer[Int] = {
    val buf = ArrayBuffer.empty[Int]
    val s = Math.sqrt(n).toInt

    for (i <- 1 to s) {
      if (n % i == 0) {
        buf.append(i)
        if (i != n / i) {
          buf.append(n / i)
        }
      }
    }
    buf
  }

  @tailrec
  def gcd(a: Long, b: Long): Long = {
    val reminder = a % b
    if (reminder == 0) {
      b
    } else {
      gcd(b, reminder)
    }
  }

  @tailrec
  def gcd(a: Int, b: Int): Int = {
    val reminder = a % b
    if (reminder == 0) {
      b
    } else {
      gcd(b, reminder)
    }
  }

  def lcm(a: Long, b: Long): Long = {
    a / gcd(a, b) * b
  }

  def toBitArray(n: Int, width: Int): Array[Boolean] = {
    val buf = ArrayBuffer.fill(width)(false)

    @tailrec
    def inner(n: Int, i: Int): Array[Boolean] = {
      buf(i) = (n & 1) == 0
      if (i == 0) {
        buf.toArray
      } else {
        inner(n / 2, i - 1)
      }
    }

    inner(n, width - 1)
  }

  def modpow(n: Long, p: Long, m: Long): Long = {
    @tailrec
    def inner(n: Long, p: Long, acc: Long): Long = {
      if (p == 0) {
        acc
      } else if ((p & 1) == 0) {
        inner(n * n % m, p >> 1, acc)
      } else {
        inner(n * n % m, p >> 1, acc * n % m)
      }
    }

    inner(n % m, p, 1)
  }

  def main(args: Array[String]): Unit = {
    implicit val in: BufferedReader = new BufferedReader(new InputStreamReader(System.in))
    val out = new PrintWriter(new BufferedOutputStream(System.out))
    val (n, k) = get[Int, Int]
    val ps = getArray[Int].map(_ - 1)
    val cs = getArray[Int]

    log("=====")
    log(List(n, k).mkString(" "))
    log(ps.map(_ + 1).mkString(" "))
    log(cs.mkString(" "))
    log("--")

    val clusters = ps.foldLeft[(ArrayBuffer[ArrayBuffer[Int]], Array[Boolean])]((ArrayBuffer.empty[ArrayBuffer[Int]], Array.fill(n)(false))) {
      case ((clusters, seens), p) =>
        @tailrec
        def traverse(cluster: ArrayBuffer[Int], index: Int): ArrayBuffer[Int] = {
          if (seens(index)) {
            cluster
          } else {
            seens(index) = true
            traverse(cluster += cs(index), ps(index))
          }
        }

        if (!seens(p)) {
          (clusters += traverse(ArrayBuffer.empty[Int], p), seens)
        } else {
          (clusters, seens)
        }
    }._1

    log("Clusters=")
    debug {
      for (cluster <- clusters) {
        log(s" ${cluster.mkString(",")}")
      }
    }

    log("Search max")

    var max = Long.MinValue
    for (cluster <- clusters) {
      log(s" cluster=${cluster.mkString(",")}")
      var totalSum = 0L
      for (c <- cluster) {
        totalSum += c
      }
      log(s"   totalSum(${totalSum})")

      for (i <- cluster.indices) {
        var sum = 0L
        val maxWidth = Math.min(k, cluster.length)
        for (j <- 0 until maxWidth) {
          sum += cluster((i + j) % cluster.length)
          if (totalSum > 0) {
            max = Math.max(max, sum + totalSum * ((k - (j + 1)) / cluster.length))
          } else {
            max = Math.max(max, sum)
          }
        }
      }
    }

    out.println(max)
    out.flush()
  }
}

Measured memory_bytes: 59900