109.1.. Učitiat i ispisati dvodimenzionalni niz - matricu 4x3.

Opis programa:

Tekstualni algoritam:

  1. dimenzionisati niz
  2. za i = 1 do 2 radi
    za j = 1 do 3 radi
    upis i,j-tog člana niza
  3. za i = 1 do n radi
    za j = 1 do 3 radi
    ispis i,j-tog člana niza

Listing programa:

PROGRAM p10911002;
USES
  WinCrt;
VAR
 i,j : INTEGER;
 X : ARRAY [1..4,1..3] OF INTEGER;
BEGIN
  WRITELN('Ulaz i izlaz niza');
  FOR i := 1 TO 4 DO  {ulaz}
    FOR j := 1 TO 3 DO
      BEGIN
        WRITE('X[',i,',',j,']=');
        READLN(X[i,j]);
      END;
  WRITELN('Izlaz niza');
  FOR i := 1 TO 4 DO  {izlaz}
    BEGIN
      WRITELN;
      FOR j := 1 TO 3 DO
        WRITE(X[i,j]:4);
    END;
END.

Izvođenje programa:

Index