Seite 1 von 1

arrays in turbopascal

Verfasst: 20.12.2005 15:16
von ArminF
in turbopascal werden arrays ja in dem Teil, wo man Variablen deklariert, wie folgt definiert:

VAR Zeichenkette: ARRAY [1..5] OF REAL;

oder

VAR Namensliste: ARRAY [1..5] OF STRING [25];


wobei letzteres auch einen eindimensionalen array erzeugt, dessen einzelne elemente strings mit einer maximalen länge von 25 zeichen sind.

so weit so gut. jetzt frage ich mich: kann ich die bezeichnung der einzelnen elemente (sprich der ausdruck "[1..5]") auch mit variablen machen, die im programm später definiert werden (also à la "[unten..oben]" wobei unten und oben später die werte z.b. 1 und 30 erhalten)?

grüße

armin

Verfasst: 20.12.2005 16:39
von FloHimself
Dynamische Arrays kannst du in Pascal wie folgt nutzen:

Code: Alles auswählen

var
  Namensliste: array of String[25];    // dynamisches array deklarieren
  AnzahlNamen: integer;                // variable für die länge des arrays
begin
  AnzahlNamen := 2;                    // länge festlegen
  SetLength(Namensliste, AnzahlNamen); // dem array speicher zuweisen
  Namensliste[0] := 'Peter';           // ersten array element einen string zuweisen
  Namensliste[1] := 'Klaus';           // und dem zweiten auch
end.
Habe es aber mangels Compiler nicht ausprobiert :!:

Dynamische Liste statt dynamisches Array

Verfasst: 22.12.2005 15:19
von Karl
In Standard-Pascal ist das glaube ich nicht möglich. Du kannst statt dessen eine dynamische Liste auf Basis eines Verbundtyps verwenden:

Code: Alles auswählen

type
tRefListe = ^tList;
tList = record
             bezeichnung: string[25];
             next: tRefListe
          end;

var
Anfang: tRefListe;
Dann brauchst du noch eine Einfügeprozedur, eine Suchprozedur und eine Ausgabeprozedur.

Gruß Karl

Verfasst: 22.12.2005 15:30
von KeyKon
Ich, weis, ich weis, das hilft nicht.
Aber ich hasse TurboPascal :evil:
Weil ich gezwungen war es in der Schule unter DOS zu benutzen :evil:
Das ist meine Meinung <)

KeyKon

Verfasst: 23.12.2005 16:20
von ArminF
KeyKon hat geschrieben:Ich, weis, ich weis, das hilft nicht.
Aber ich hasse TurboPascal :evil:
Weil ich gezwungen war es in der Schule unter DOS zu benutzen :evil:
Das ist meine Meinung <)

KeyKon
hähä... das ist halt der kleine aber feine unterschied... ich hab ca. 91 / 92 in der 11. turbo pascal in der schule gehabt und seitdem nix mehr programmiert. bin jetzt gerade wieder auf rein freiwilliger basis auf turbo pascal und blubber halb privat, halb für meine Arbeit (biolog. Dr.arbeit) ein wenig damit rum...

danke schon mal für eure tips. ich hoffe das gerade eben für 1 € bei ebay ersteigerte Buch (Rosenbaum/Schölles: "Turbo Pascal 6.0" [von DataBecker]) bietet mir auf seinen 1067 Seiten ein paar mehr Antworten als das mit Turbo Pascal 6.0 mitersteigerte Buch ("Rütten/Granken: "Turbo Pascal 6.0 Grundlagen der Programmiersprache - Das Einsteigerseminar" mit 189 Seiten). Immer wieder geil wie man bei ebay Geld sparen kann :D

Weihnachtliche Grüße

armin f.

Verfasst: 23.12.2005 23:22
von KeyKon
naja, damals waren dir PC doch noch nich sooo weit...
wenn du ein buch brauchst kann ich dir ja mein schulbuch schicken :lol:

KeyKon

Verfasst: 24.12.2005 17:38
von ArminF
KeyKon hat geschrieben:naja, damals waren dir PC doch noch nich sooo weit...
wenn du ein buch brauchst kann ich dir ja mein schulbuch schicken :lol:

KeyKon

nönö laß man gut sein mit dem buch... 1067 S. reichen mir

PS. irgendwie kann man sich's gar nimmer vorstellen, die Zeit vor win95... lang lang isses her...

Verfasst: 29.12.2005 00:51
von stbi
ArminF hat geschrieben:PS. irgendwie kann man sich's gar nimmer vorstellen, die Zeit vor win95... lang lang isses her...
ja, aber wenn Du Deinen Dr in der Gegenwart machst, warum programmierst Du dann mit Software aus der Steinzeit?

Verfasst: 03.01.2006 21:02
von ArminF
stbi hat geschrieben:
ArminF hat geschrieben:PS. irgendwie kann man sich's gar nimmer vorstellen, die Zeit vor win95... lang lang isses her...
ja, aber wenn Du Deinen Dr in der Gegenwart machst, warum programmierst Du dann mit Software aus der Steinzeit?
ich brauch das programmieren nicht zwingend für die biologische (!) Dr.Arbeit. Ist einfach ne Spielerei von mir. Klar, wenn ich das jetzt zwingend bräuchte, dann würde man das mit ner neueren Programmiersprache machen. Andererseits ist es so daß ich dann nicht das Zeug selbst organisieren/bezahlen würde, sondern meine Chefin das für die Arbeit bezahlen würde.

...also laßt mir doch meinen Spaß am Spielen *verzweifel* :lol: