Problem

8 /13


Durchlaufen aller Zeichen

Theory Click to read/hide

Da das Symbol auf dem Index verwendet werden kann, kann ein variabler Zyklus verwendet werden, um alle Symbole zu konvertieren, die die möglichen Indexwerte annehmen. Zum Beispiel würde ein Programm, das alle Zeilensymbolcodes auf dem Bildschirm platziert, so aussehen.

für i:= 1 bis Länge(n)
Schreib(s[i], ord(s[i])
Programmerklärungen:
(1) Funktion length(s) findet die Länge der Linie. Der erste Symbolindex ist 1 und die letzte Länge(n). Geänderter Zyklus I Es nimmt aufeinanderfolgende Werte von 1 bis Länge(n).
(2) In jeder Zeile wird das Symbol zuerst entfernt und dann der Code, der die eingebaute Funktion zurückgibt ord()

Die gleiche Probenahme kann kürzer sein:
für c in s do
Schreibln(c, ord(c));
In diesem Fragment wählt die Überschrift des Zyklus alle Symbole s aus und setzt sie wiederum in die Variable c.

Pascal ' s Spezialität im Umgang mit den Linien ist, dass die Linien sind variable Objekte. Mit anderen Worten können wir die einzelnen Symbole der Linie ändern.
Zum Beispiel wird der nächste Bediener funktionieren.
s[5] := 'a';
Aus den Symbolen kann auch eine neue Linie mit den erforderlichen Modifikationen gezeichnet werden.
So wird beispielsweise ein Programm, das alle Symbole 'a' mit den Symbolen 'b' ersetzt, wie folgt aussehen:
gelesen(s);
für i:= 1 bis Länge(n) beginnen
wenn s[i] = 'a'then s[i] := „b";
Ende;
Schreibwaren,
In diesem Beispiel werden im Zyklus alle Symbole der Zeile s umgesetzt. Im Körper des Zyklus überprüfen wir die Variablen s[i]: Wenn das Symbol mit dem Symbol a übereinstimmt, ersetzen wir sie mit 'b'.

Problem

Schreiben Sie ein Programm, das in der Zeile alle Punkte auf Null und alle "X" auf Einheiten ersetzt.

Beispiele
NeinEingangsdatenAusgangsdaten
1# X. # XXANHANG