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
- Python est introuvable. exúcutez sans argument pour procúder ó l - Forum Python
- Code 100 details manifest incompatible ✓ - Forum Réseaux sociaux
- Type d'argument ByRef incompatible ✓ - Forum VB / VBA
- Python est introuvable. ExÚcutez sans argument pour procÚder ✓ - Forum Python
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]...
