Fonction ord

mimi2601 Messages postés 8 Statut Membre -  
mimi2601 Messages postés 8 Statut Membre -
Bonjour,
je veux l"algorithme de la fonction ORD en pascal
merci de votre attention :)
A voir également:

1 réponse

mimi2601 Messages postés 8 Statut Membre
 
j'ai trouvé la solution :p

Function DOR (c : char) : integer;
var i : integer;
begin
i:=-1;
repeat
i:=i+1;
until chr(i)=c;
DOR:= i;
end;
0