Jak už tady radí další; string (text. řetězec) je jednorozměrný pole znaků (na indexu 0 je tuším v Pascalu délka řetězce v bytech); stačí teda cyklem for projít text. řetězec jako pole znaků a každej znak z toho pole porovnat s tím zadaným znakem.

Na zjištění délky řetězce je funkce strlen.

Jo a pro jistotu nepoužívej diakritiku (uživ. vstup).