Дано слово. Выведите на экран его k-й символ, а также последовательность c k1 по k2
Var
s: string;
k, k1, k2: integer;
begin
readln(s);
readln(k, k1, k2);
writeln(s[k]);
writeln(copy(s, k1, k2-k1+1));
end.
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
