Különbségek

A kiválasztott változat és az aktuális verzió közötti különbségek a következők.

--- inf-prog-fszi:egydimenzios_toemboek [2017/06/20 12:04]
beistvan
+++ inf-prog-fszi:egydimenzios_toemboek [2017/06/22 10:31] (aktuális)
beistvan
@@ Sor 59: / Sor 59: @@
 </code>
+===== Nyitott tömbök =====
+Free Pasca verziója legalább 2 és a Turbo Pascal verziója legalább 7.
+<code pascal nyitott_tomb.pas>
+program nyitott_tomb;
+Procedure tomb_nyomtatas(egyTomb: array of integer);
+var
+  k: integer;
+begin
+  for k := 0 to High(egyTomb) do
+    Write(egyTomb[k]:3);
+  WriteLn
+end;
+const
+  A: array [-1..2] of integer = (0,1,2,3);
+  B: array [5..7] of integer = (4,5,6);
+begin
+  tomb_nyomtatas(A);
+  tomb_nyomtatas(B);
+  readln;
+end.
+</code>
+<code pascal tomb_hossz.pas>
+program tomb_hossz;
+const
+  a:array[-4..5]of byte =(1,2,3,4,5,6,7,8,9,10);
+var
+  i:integer;
+begin
+  writeln(high(a));
+  writeln(low(a));
+  for i:=low(a) to high(a) do
+    write(a[i]:3);
+  readln;
+end.
+</code>

II. RF KMF DokuWiki