In Delphi ist ein Array eine der grundlegenden Datenstrukturen, mit der Sie viele Elemente desselben Typs speichern und verarbeiten können. Die Eingabe eines Arrays über die Tastatur ist eine der häufigsten Operationen bei der Entwicklung von Delphi-Programmen. In diesem Artikel werden wir uns einen einfachen Leitfaden ansehen, mit dem Sie lernen, wie Sie Arrays über die Tastatur eingeben und einige nützliche Codebeispiele lernen können.
Zuerst müssen Sie die Dimension des Arrays bestimmen. Dies kann mit der integrierten Funktion erfolgen ReadLn, die das Lesen von Daten über die Tastatur ermöglicht. Um beispielsweise die Dimension eines eindimensionalen Arrays einzugeben, geben Sie den folgenden Code ein:
Nachdem wir die Dimension des Arrays definiert haben, können wir mit der Eingabe der Elemente des Arrays fortfahren. Dies kann mit einer Schleife erfolgen for. Hier ist ein Beispielcode zum Eingeben von Array-Elementen:
Jetzt kennen Sie eine einfache Möglichkeit, ein Array über die Tastatur in Delphi einzugeben. Dies ist nicht kompliziert, kann aber sehr nützlich sein, wenn Sie Programme entwickeln, die die Arbeit mit Arrays erfordern.
Array-Eingabe in Delphi: einfache Anleitung und Code
Delphi hat mehrere Möglichkeiten, ein Array über die Tastatur einzugeben. In diesem Leitfaden werden wir den einfachsten Weg betrachten.
Schritt 1: Erstellen und Definieren der Dimension des Arrays.
Bevor Sie ein Array eingeben, müssen Sie dessen Dimension bestimmen. Dies kann wie folgt erfolgen:
vararraySize: Integer;myArray: array of Integer;beginWrite('Введите размер массива: ');Readln(arraySize);SetLength(myArray, arraySize);end;Schritt 2: Eingabe der Array-Elemente.
Nachdem Sie die Dimension eines Arrays ermittelt haben, können Sie mit der Eingabe seiner Elemente beginnen. Dazu wird eine Schleife verwendet, die alle Elemente des Arrays durchlaufen und über die Tastatur eingeben wird:
vari: Integer;beginfor i := 0 to Length(myArray) - 1 dobeginWrite('Введите элемент массива (', i + 1, '): ');Readln(myArray[i]);end;end;Nachdem dieser Code ausgeführt wurde, werden alle Elemente des Arrays erfolgreich eingegeben.
Initialisieren eines Arrays in Delphi
1. Initialisieren eines eindimensionalen Arrays:
- Verwenden einer Schleife:
- var i: Integer; arr: array[1..5] of Integer; begin for i := 1 to 5 do arr[i] := i; end;
- Verwenden des expliziten Wertes:
- var arr: array[1..5] of Integer = (1, 2, 3, 4, 5); begin // code end;
2. Initialisieren eines zweidimensionalen Arrays:
- Verwenden von Schleifen:
- var i, j: Integer; arr: array[1..3, 1..3] of Integer; begin for i := 1 to 3 do for j := 1 to 3 do arr[i, j] := i + j; end;
- Verwenden des expliziten Wertes:
- var arr: array[1..3, 1..3] of Integer = ((1, 2, 3), (4, 5, 6), (7, 8, 9)); begin // code end;
3. Initialisieren eines dynamischen Arrays:
- Verwenden der SetLength-Funktion:
- var arr: array of Integer; begin SetLength(arr, 5); // Code end;
- Verwenden der dynamic array-Direktive:
- var arr: TArray; begin SetLength(arr, 5); // Code end;
Indem wir den Elementen des Arrays beim Initialisieren Anfangswerte zuweisen, können wir zusätzliche aufregende Codezeilen vermeiden, die bei der normalen Initialisierung erforderlich sein könnten.
Beachten Sie, dass bei der Initialisierung eines Arrays durch Aufzählen von Werten die Anzahl der aufgelisteten Elemente der Größe des Arrays entsprechen muss. Andernfalls wird ein Kompilierungsfehler generiert.
Eingabe eines Arrays über die Tastatur in Delphi
In Delphi können Sie Arrays einfach über die Tastatur eingeben, indem Sie die standardmäßigen Sprachfunktionen und -verfahren verwenden. Sie können dazu den folgenden Algorithmus verwenden:
- Legt die Dimension des Arrays fest.
- Erstellen Sie ein Array mit der angegebenen Dimension.
- In einer Schleife werden die Werte der Array-Elemente über die Tastatur gelesen.
- Weisen Sie den Elementen des Arrays gelesene Werte zu.
Hier ist ein Beispielcode, der diese Operation veranschaulicht:
program InputArray;vararr: array of Integer;n, i: Integer;beginWrite('Введите размер массива: ');ReadLn(n);SetLength(arr, n);for i := 0 to n - 1 dobeginWriteLn('Введите значение элемента ', i + 1, ': ');ReadLn(arr[i]);end;WriteLn('Массив:');for i := 0 to n - 1 doWriteLn(arr[i]);end.In diesem Beispiel kann der Benutzer die Dimension eines Arrays festlegen und die Werte seiner Elemente über die Tastatur eingeben. Das eingegebene Array wird dann auf dem Bildschirm angezeigt.
Jetzt wissen Sie, wie Sie Arrays von der Tastatur in Delphi eingeben. Diese Fähigkeit kann bei der Entwicklung von Programmen nützlich sein, die mit Arrays arbeiten und Daten vom Benutzer eingeben müssen.
Eingabe eines eindimensionalen Arrays mit einer Schleife
Betrachten Sie ein einfaches Beispiel für die Implementierung einer Eingabe eines eindimensionalen Arrays mit einer Schleife:
arr: array of Integer;
Write('Array-Größe eingeben: ');
WriteLn('Array-Elemente eingeben: ');
for i := 0 to n - 1 do
for i := 0 to n - 1 do
WriteLn('arr[', i + 1, ']: ', arr[i]);
// zusätzliche Aktionen mit einem Array
In diesem Beispiel wird der Benutzer zuerst aufgefordert, die Größe des Arrays einzugeben, und das Array wird dann mit der SetLength-Funktion erstellt. Anschließend werden die Array-Elemente mithilfe einer for-Schleife eingegeben. Bei jeder Iteration der Schleife wird der Benutzer aufgefordert, einen Wert für ein Array-Element einzugeben, der im entsprechenden Array-Index gespeichert wird. Nach der Eingabe des Arrays wird das eingegebene Array angezeigt.
Beachten Sie, dass in diesem Beispiel das Eingabearray vom Typ Integer ist, Sie jedoch bei Bedarf einen anderen Datentyp verwenden können.
Nachdem Sie ein Array eingegeben haben, können Sie je nach den Anforderungen Ihres Programms zusätzliche Aktionen und Operationen mit diesem Array durchführen.
Eingeben eines mehrdimensionalen Arrays mithilfe von Schleifen
Sie können verschachtelte Schleifen verwenden, um ein mehrdimensionales Array mit Schleifen in Delphi einzugeben.
Angenommen, Sie haben ein zweidimensionales Array der Größe 3x4. Sie können zwei verschachtelte Schleifen verwenden - eine zum Durchlaufen von Zeilen und die andere zum Durchlaufen von Spalten:
var arr: array[1..3, 1..4] of Integer; i, j: Integer; begin for i := 1 to 3 do begin for j := 1 to 4 do begin Write('Arr-Element eingeben[', i, ', ', j, ']: '); ReadLn(arr[i, j]); end; end; end;
In diesem Beispiel werden die Elemente des arr-Arrays durch verschachtelte Schleifen sequenziell eingegeben. Der Benutzer wird aufgefordert, für jedes Element einen Wert einzugeben, der in die entsprechende Zelle des Arrays geschrieben wird.
Auf diese Weise können Sie mithilfe von Schleifen Elemente von mehrdimensionalen Arrays bequem und effizient in Delphi eingeben, wodurch Sie den Code reduzieren und die Programmierung vereinfachen können.
Der Artikel zeigt, wie Sie mehrdimensionale Arrays mithilfe von Schleifen in Delphi eingeben. Wir tun dies mit zwei verschachtelten Schleifen. Für jede Zeile und Spalte wird eine Schleifentrennung aufgerufen, in der der Benutzer aufgefordert wird, ein Element einzugeben und es in ein Array zu schreiben.
Beispielcode zum Eingeben eines Arrays über die Tastatur
Sie können den folgenden Code verwenden, um ein Array über die Tastatur in Delphi einzugeben:
program InputArray;vararr: array of Integer;n, i: Integer;beginWrite('Введите размер массива: ');Readln(n);SetLength(arr, n);WriteLn('Введите элементы массива:');for i := 0 to n - 1 dobeginWrite('arr[', i, '] = ');Readln(arr[i]);end;WriteLn('Введенный массив:');for i := 0 to n - 1 doWriteLn('arr[', i, '] = ', arr[i]);ReadLn;end.In diesem Beispiel fragen wir den Benutzer zuerst nach der Größe des Arrays und erstellen mit der SetLength-Funktion ein Array der gewünschten Größe. Dann durchlaufen wir alle Elemente des Arrays mit einer for-Schleife und füllen sie mit den über die Tastatur eingegebenen Werten aus. Danach geben wir das eingegebene Array auf dem Bildschirm aus.
