Вычислить сумму первых K цифр 100-значного числа - PascalABC.NET (25106)

Формулировка задачи:

Напишите программу, которая вычисляет сумму первых K цифр 100-значного числа. Формат входных данных В первой строчке содержится число К (1<K<100)- количество цифр. Во второй строке записано 100-значное число. Формат выходных данных Одно число - сумму первых Л цифр данного числа. Не знаю как это решить.

не Л а K

Решение задачи: «Вычислить сумму первых K цифр 100-значного числа»

Листинг программы

begin
  var S := ReadLnString('большое число =');
  var K := ReadLnInteger('K =');
  var Sum := 0;
  for var i := 1 to Min(K, S.Length) do
    Sum += StrToInt(S[i]);
  WriteLn(Sum);
end.

Объяснение кода листинга программы

В первой строке кода вводится строка большое число =, которую считывает функция ReadLnString.
В следующей строке кода вводится число K, которое считывает функция ReadLnInteger.
Далее вводится переменная Sum, которая инициализируется значением 0.
В цикле for, который выполняется от 1 до K, происходит добавление цифр числа в переменную Sum. При этом цикл выполняется столько раз, сколько это возможно, но не больше K.
Значение переменной Sum выводится на экран с помощью функции WriteLn.