Задание в Паскале. Дана строка, найти 3 символ

Program Task;
Var s: String;
Begin
    WriteLn(Введите строку);
    ReadLn(s);
    WriteLn(Третий символ: , s[3]);
    ReadLn;
End.

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.