Incompatible types : 'char' and 'string'
rayenneyassine
-
Utilisateur anonyme -
Utilisateur anonyme -
Program code;
Uses WinCrt;
Var
x:String;
z:Char;
r:Integer;
Begin
WriteLn('donner un mot'); Readln(x);
z:=Copy(x,((Length(x)) Div 2), 1);
r:= Ord(z);
WriteLn (r);
End.
j'ai essayée mais le programme ne fonctionne pas et affiche :
incompatible types : 'char' and 'string'
Uses WinCrt;
Var
x:String;
z:Char;
r:Integer;
Begin
WriteLn('donner un mot'); Readln(x);
z:=Copy(x,((Length(x)) Div 2), 1);
r:= Ord(z);
WriteLn (r);
End.
j'ai essayée mais le programme ne fonctionne pas et affiche :
incompatible types : 'char' and 'string'
A voir également:
- Type d'argument byref incompatible
- Clear type - Guide
- Faiblesse type spectre ✓ - Forum Jeux vidéo
- Type de l’argument ByRef - Forum VB / VBA
- Type de ram - Guide
- Incompatibilité de type vba ✓ - Forum Programmation
1 réponse
Bonjour
La fonction Copy donne une 'string'.
Toi tu essayes de mettre le résultat dans un char quand tu fais
Pour extraire un char unique d'une string x, il faut utiliser la notation x[1], x[2]...
La fonction Copy donne une 'string'.
Toi tu essayes de mettre le résultat dans un char quand tu fais
z:= Copy(...: ce n'est pas possible, les deux types sont incompatibles. Même si ta 'string' fait un seul caractère.
Pour extraire un char unique d'une string x, il faut utiliser la notation x[1], x[2]...
