Matrix pascal - bemenet és kimenet

CONST - a szó, hogy „beszél”, hogy a program, amely továbbra is a bejelentett állandók
kol_strok - változó, amely tárolja a sorok számát
kol_stolbcov - változó, amely tárolja az oszlopok számát
VAR - a szó, hogy „beszél”, hogy a program, amely továbbra is deklarált változókat, amelyek használják a programot, és típusuk
A - tartalmazó tömb húrok kol_strok kol_stolbcov oszlopok álló REAL (valós számok)
i, j - egész (integer) változók
BEGIN - indítsa el a program
i: = 1 kol_strok do - "i 1-től kol_strok csinálni." azaz az alábbi nyilatkozatot végrehajtásra kerül az i = 1,2,3. kol_strok
j: = 1 kol_stolbcov do - "j 1-től kol_stolbcov csinálni." azaz az alábbi nyilatkozatot kell elvégezni, ha j = 1,2,3. kol_stolbcov
Read (A [i, j]) - kéri, hogy adja meg az A mátrix tag állt a kereszteződésekben a i-edik sorának és j-edik oszlop
END. - a végén a program

Automatikus véletlenszerű hozzárendelés értékeinek az intervallum [-100, 100]:

CONST
kol_strok = 5;
kol_stolbcov = 4;
VAR
A: array [1..kol_strok, 1..kol_stolbcov] az egész;
i, j: integer;
BEGIN
Véletlenszerű;
i: = 1 kol_strok do
j: = 1 kol_stolbcov Do
A [i, j]: = Random (101) -Random (101);
END.

Véletlenszerű; - ki kell használni Random kapott különböző értékeket
Random (101) - véletlen egész szám a [0; 101)

Írása (A [i, j]: 4: 2, „”) - kijelző elem A mátrix, állt a kereszteződésekben a i-edik sorának és j-edik oszlopra, a 4-es számú helyzetben, 2-helyzetben a vessző után és egy szóközt
WriteLn - átmenet a következő sorban