Ответы
Ответ дал:
0
{ Ответ дан на языке Pascal }
PROGRAM Solution(INPUT, OUTPUT);
VAR
Str: STRING;
k: INTEGER;
BEGIN
WRITE('Введите строку: ');
READLN(Str);
WRITE('Введите k-й символ: ');
READLN(k);
WRITELN(Str[k]);
END.
PROGRAM Solution(INPUT, OUTPUT);
VAR
Str: STRING;
k: INTEGER;
BEGIN
WRITE('Введите строку: ');
READLN(Str);
WRITE('Введите k-й символ: ');
READLN(k);
WRITELN(Str[k]);
END.
Вас заинтересует
1 год назад
1 год назад
2 года назад
2 года назад
3 года назад
8 лет назад