[Pascal] Qui veut me faire mon exercice ?

Bonjour,
je voudrais la solution en Pascal du programme suivant. il saisit une chaine de caractères CH composée uniquement par des lettres et de saisir 2 entiers d et f puis de determiner le nombre d'occurences de la sous chaine S formée par la suite des caractères de lindice d à lindice f dans la chaine.

exemple: pour CH ='dans bonbon on trouve bon c'est pour cette raison que c'est si bon'
d=6
f=8
le resultat retourné est 4.

merci !!!!!