Hi,
Also ich will ein Codierungs Proggi in Pascal 5.0 machen. das problem ist ich weiss nicht wie man ein einzelndes Zeichen aus einer Zeichenkette rauskriegt.
Versucht habe ich es auf 2 Varianten
Wenn ich nun aber ab als Text eingebe gibt er nichts aus...
Kann mir Bitte jemand sagen wie ich das Prob löse?
Also ich will ein Codierungs Proggi in Pascal 5.0 machen. das problem ist ich weiss nicht wie man ein einzelndes Zeichen aus einer Zeichenkette rauskriegt.
Versucht habe ich es auf 2 Varianten
Code:
Text:String // Oben deklariert
Writeln('Text: ');
Readln(Text);
i:=1;
Laenge:=length(Text);
For i.=1 to Laenge DO
If Eingabe=a Then Write('Zeichen a');
oder
If Eingabe[i]=a Then Write('Zeichen a');
Wenn ich nun aber ab als Text eingebe gibt er nichts aus...
Kann mir Bitte jemand sagen wie ich das Prob löse?
Zuletzt bearbeitet: