Typisierte Arrays - Wie?

Christian Hönnicke

Hallo Dirk,

ich wollte im anderen Thread nicht unter anderem Thema weiter machen.

Kannst du bitte erklären, wie man mit typisierten Arrays arbeitet? Ich würde gerne was der folgenden Art umsetzen (Pseudocode - inhaltlich sinnfrei):

Code: Alles auswählen

Var a&#91;&#93; &#58; Integer
...
a = new Integer&#91;100&#93;

for &#40;int i = 1; i < a.Count; i++&#41;
a&#91;i&#93; = a&#91;i-1&#93; + i
next

Show&#40;a&#41;
...

procedure Show&#40;var a&#91;&#93; &#58; Integer&#41; // für beliebig große Arrays
  foreach i in a
    sm &#40;i&#41;
  next
end procedure

Gruß
Christian

Beitrag von **Team Schauries** » Do, 27 Jan, 2011 18:24

Hallo Christian,

unter InterRun würde das ungefähr so aussehen…

Code: Alles auswählen

Var a&#91;100&#93; &#58; Integer 
Var I &#58; Integer
... 

For I = 1 to 99 
  a&#91;i&#93; = a&#91;i-1&#93; + i 
Next 

Show&#40;a&#41; 
... 

Procedure Show&#40;var a&#91;&#93; &#58; Integer&#41; // für beliebig große Arrays 
  Var I &#58; Integer

  For i = 0 to 99 
    Sm &#40; IntToStr&#40; a&#91;i&#93; &#41; &#41; 
  Next 
EndProcedure

Leider gibt es in der Version 9.4 bei der Initialisierung einer Array-Varablen einen Fehler daher empfehle ich die aktuelle Beta-Version 9.5

http://www.eurokass.de/beta/EK270111.exe

Viele Grüße,
Dirk