Πίνακες

Διομήδης Σπινέλλης
Τμήμα Διοικητικής Επιστήμης και Τεχνολογίας
Οικονομικό Πανεπιστήμιο Αθηνών
dds@aueb.gr

Ορισμός πινάκων

Παράδειγμα:

const
	red = 0;
	green = 1;
	blue = 2;

var
   grades : array [1..120] of integer;
   temperatures : array [-5..5] of real;
   table : array [0..10,0..20] of real;
   screen : array [0..479,0..639] of array [red..blue] of integer;

Χρήση στοιχείων

Παράδειγμα:

   grades[15] := 9;
   temperatures[-2] := 37.8;
   table[3,2] := 12.3;
   screen[5,7][red] := 12;

Χρήση πινάκων

Παράδειγμα:

type
     grades = array [1..120] of integer;

var
     thisYear, lastYear : grades;

procedure readGrades(var theGrades : grades);
...

begin
     readGrades(lastyear);
     thisYear := lastYear
end.

Βιβλιογραφία

Ασκήσεις

Pascal 07

  1. Να γραφεί πρόγραμμα σε Pascal το οποίο να διαβάζει 5 χαρακτήρες και να τους τυπώνει σε αλφαβητική σειρά.

    Παράδειγμα:

    O
    S
    I
    D
    A
    
    A
    D
    I
    O
    S
    
Περισσότερες λεπτομέρειες για τις ασκήσεις