Как только вы поняли проблему, сам код становится простым. Здесь я продемонстрирую использование R.
Начнем с определения S , набора строк, который нам дан:
S <- letters[1:5]
S <- paste0(S, S, S, S, S)
S
#> [1] "aaaaa" "bbbbb" "ccccc" "ddddd" "eeeee"
Теперь мы можем объединить Lth в строку Rth вектора строк, Str очень легко, выполнив
concat <- function(Str, L, R) paste0(Str[L:R], collapse = "")
Так, например, если бы нам дали L = 1 и R = 2, мы могли бы сделать:
concat(S, 1, 2)
[1] "aaaaabbbbb"
Кроме того, мы можем найти символ в позиции K любой строки Str следующим образом:
char_at <- function(Str, K) substr(Str, K, K)
Итак, если мы объединим эти два, мы получим:
f <- function(L, R, K) char_at(concat(S, L, R), K)
Например:
# Q1
f(3, 3, 3)
#> [1] "c"
# Q2
f(1, 5, 16)
#> [1] "d"
# Q3
f(3, 5, 15)
#> [1] "e"