Bon, alors j´ai pas tout compris :
s1 est un string, pourquoi veux tu la comparer avec un integer ?
Bon, ensuite, j´espere que quand tu mets x1,x2,x3, tu parles bien de x[1], x[2], x[3], que c´est un tableau que tu as déclaré ainsi :
x:array[0..40] of integer;
sinon tu vas te faire chier.
Bon, j´extrapole, tu veux :
" valeur de s1" = 1
donc comme on ne peut pas comparer une string avec un int, il doit falloir conversion :
tu veux peut etre savoir si dans ta chaine tu as " 1"
dans ces cas la, tu as peut etre l´équivalent du atoi() en C.
Tu dois avoir une fonction qui converti les string en int Il faut que tu la trouve.
Mais je ne sais plus, j´ai arreté le pascal il y a 4 ans.
Si ce n´est pas ça, précise ta question 