Kahemõõtmelised Pascal massiivid - maatriks. Kahemõõtmelised massiivid. Matrix moodustumine ja väljund selle elementide Kuidas teha maatriks Pascal ABC

Kahemõõtmeline massiivi Andmestruktuur, mis salvestab vormi ristkülikukujulise maatriksi:

A. 11 A. 12 A. 13 A. 14 A. 15 ... A. 1m. A. 21 A. 22 A. 23 A. 24 A. 25 ... A. 2m. A. 31 A. 32 A. 33 A. 34 A. 35 ... A. 3m. A. 41 A. 42 A. 43 A. 44 A. 45 ... A. 4m. A. 51 A. 52 A. 53 A. 54 A. 55 ... A. 5m. ... ... ... ... ... ... ... ... ... ... ... n1 A. n2. A. n3 A. n4. A. n5 ... A. nm.

  • Maatriksis määratakse iga element joone numbri ja kolonni numbri järgi, mille ristmikul see on
  • Pascalis uuritakse kahemõõtmelist massiivi massiiviina, mille elemendid on lineaarsed massiivid (massiivid). Järgmised kahemõõtmelise massiivi kirjeldused on identsed var mass: massiiv reaalne; Var mass: reaalse massiivi;
  • Matrix, kus ridade arv on võrdne veergude arvuga ruudu maatriks.
  • Et viidata maatriksilemendile, peate kasutama kahte indeksi, mis näitavad joone numbrit ja veeru numbrit. näiteks Myarr1. Sellisel juhul on massiivi element (Myarr1) neljas rida ja viies kolonn.
  • Kõik, mida on öeldud ühemõõtmeliste massiividega põhiliste meetmete kohta, on maatrikside jaoks õiglane. Templi mampliga tsüklis tegutsevad täisarvatüübi muutujad indeksitena. Traditsiooniliselt kasutatakse identifikaatorit liiniindeksi näitamiseks. i. "Ja veerg -" j. “.
  • Matsiidi töötlemine on see, et esimese rea elemendid (veerg) esimest korda peetakse esimest korda, siis teise jne.
  • Kui elemendi rea arv langeb kokku veeru numbriga ( i \u003d j.) See tähendab, et element peitub peamine diagonaalne Maatriks.
  • Kui element asub diagonaalil, on indeksid seotud elementide arvuga ( n.) Järgmine võrdõiguslikkus: i + j \u003d n + 1

Kahemõõtmelise massiivi kirjeldus

Pascalis on kahemõõtmelise massiivi reklaam (kirjeldused) mitmeid viise

Eelnevalt kirjeldus tüüpi massiivi

Tüüp maatriks \u003d massiiv täisarv; (Täisarvud) varss: maatriks;

Muutuse määratlus massiivi kui massiivi tüübi esialgse kirjelduseta

Var mass: massiiv täisarv;

Kahemõõtmelise massiivi initsialiseerimine

Kahemõõtmelise massiivi alustamisel on iga string täiendav ümmargune sulgudes:

Const mass: massiiv \u003d ((2,3,1,0), (1,9,1,3), (3,5,7,0));

Kahemõõtmelise massiivi elementide sisend / väljund

Väga sageli sisestatakse klaviatuurist massiivi elementide väärtused. See teabevahetuse meetod on liiga aeganõudev suure suurusega massiividega töötamisel. Lai klassi algoritmide klassi silumiseks tuleks selline teabekanne asendada massiivi elementide moodustamisega juhuslikult. Selleks kasutage protseduuri juhuslikult. ja funktsioon juhuslik. Kahemõõtmeliste massiividega töötamisel kasutatakse pesastatud tsüklit (tavaliselt tsükkel parameetriga jaoks).

Massiivi juhuslike numbrite täitmine

const n \u003d 5; m \u003d 10; Var i, j: täisarv; Matrix: massiiv täisarv; Alustada randomiseerida; I: \u003d 1 kuni n do (massiiv rida) J: \u003d 1 kuni m do (lisamine element veergude) maatriks: \u003d juhuslik (100); (Me asetame praeguse elemendi juhusliku numbri ajavahemikust: 4); WRITELN (üleminek uuele reale väljundisse sisemise tsükli) lõpp;

Probleemide lahendamise näited

Näide 1.

Probleemi sõnastamine. Keskmine positiivsed numbrid m ja n on antud. Et moodustada täisarv maatriks M × N, kus kõik elemendid J-TH veerus on väärtus 5, J (J \u003d 1, ..., N).

CONST M \u003d 7; n \u003d 10; Var i, j: bait; Matrix: massiiv täisarv; Alusta i: \u003d 1 kuni M teha J: \u003d 1 kuni n do maatriks: \u003d 5 * j; ... (massiivi väljund)

Näide 2.

Probleemi sõnastamine. Keskmine positiivsed numbrid m, n ja M-numbrite komplekt. Moodustada maatriks suurus m × N, kus iga kolonn sisaldab kõiki numbreid allikas valimise (samas järjekorras).

CONST M \u003d 5; n \u003d 7; Vektor: massiivi täisarv \u003d (3, 5, 2, 7, 4); Var i, j: bait; Matrix: massiiv täisarv; Alusta j: \u003d 1 kuni n do (me võtame JTH kolonni) i jaoks: \u003d 1 kuni m do (tegeleb stringide J-Th kolonni elemendid) maatriksile: \u003d vektor (rakendamine) ... (tulemusega kahemõõtmelise massiivi toodanguga)

Kodutöö

  1. Annakse kokku positiivseid numbreid M ja N. Et moodustada täisarv maatriks suurus m × n, kus kõik elemendid I-th liin on 10 · i (i \u003d 1, ..., m).
  2. Keskmine positiivsed numbrid m, n ja N-numbrite komplekt. Et moodustada maatriks suurus m × n, kus iga rida sisaldab kõiki numbreid allikas valimisest (samas järjekorras).
  3. Lisaks.Keskmine positiivsed numbrid m, n, number D ja M-numbrite komplekt. Moodustada maatriks suurus M × N, milles esimene veerg langeb kokku allikas komplekt numbrite ja elemendid iga järgmise veeru võrdne summa vastava elemendi eelmise veeru ja number D (nagu Selle tulemusena sisaldab iga maatriksi rida aritmeetilise progresseerumise elemente).
  4. Lisaks.Suuruse M × N maatriks on antud. Näita oma elemente, mis asuvad isegi isegi numbritega (2, 4, ...). Elementide väljund on valmistatud joonte järgi, tingimuslik operaator ei kasuta.

Pascalis kahemõõtmelise massiivi tõlgendatakse ühemõõtmeliseks massiivina, mille elementide tüüp on ka massiiv (massiivi massiiv). Kahemõõtmeliste Pascal'i massite elementide asendit kirjeldavad kahe indeksiga. Neid saab esindada ristkülikukujulise tabeli või maatriksina.

Kaaluge kahemõõtmelise passaali pascal mõõtmega 3 * 3, st see on kolm rida ja igas reas kolm elementi:

Igal elemendil on oma number, nagu ühemõõtmelised massiivid, kuid nüüd koosneb number juba kahest numbrist - joon numbritest, kus element asub ja kolonni arv. Seega määratakse elemendi number stringi ja veeru ristmikul. Näiteks 21 on teine \u200b\u200bjoon ja esimeses veerus seisab element.

Pascali kahemõõtmelise massifriitsme kirjeldus.

Pascal kahemõõtmelise massiivi kuulutamiseks on mitmeid viise.

Me juba teame, kuidas kirjeldada ühemõõtmelised massiivid, mille elemendid võivad olla mis tahes tüüpi ja seetõttu võivad elemendid ise olla massiivid. Kaaluge järgmist tüüpide ja muutujate kirjeldust:

Näide Pascali kahemõõtmelise massifiltri kirjeldusest

Tüüp
Vektor \u003d massiiv<тип_элементов>;
Maatriks \u003d vektori massiiv;
Var m: maatriks;

Me kuulutasime kahemõõtmelise passaali Pascal M, mis koosneb 10 liinist, millest igaüks neist 5 veergu. Sel juhul m [i] saab juurde igale i (i] ja iga J on element I-Th rida - M [i, J].

Kahemõõtmeliste Pascal'i massiivi tüüpide määratlus võib seadistada ka ühes reas:

Tüüp
Maatriks \u003d massiivi massiivi< тип элементов >;
Või isegi lihtsam:
Tüüp
Maatriks \u003d massiivi<тип элементов>;

Kahemõõtmelise massiivi elementide avamine on vorm: m [i, j]. See tähendab, et me tahame saada element asub I-R-rida ja J-veerg. Siin peamine asi ei ole segi ajada rida veergudega, vastasel juhul saame taas kaevata olematu elementi. Näiteks on M-elemendile kaebus õigesse sisenemisvormi, kuid võib põhjustada programmi viga.

Põhitoimingud Pascal kahemõõtmelise massifiga

Kõik, mida on öeldud ühemõõtmeliste massiividega põhiliste meetmete kohta, on maatrikside jaoks õiglane. Ainus tegevus, mida saab läbi viia sama tüüpi maatriksid on ülesanne. Need, kui meil on ka kaks maatriksid ühe tüüpi programmi, näiteks

tüüp
Maatriks \u003d massiiv täisarv;
var.
A, b: maatriks;

seejärel saate programmi täitmise ajal määrata maatriksi a. Maatriksi väärtus b. (A: \u003d b). Kõik muud meetmed viiakse läbi vaheldumisi, kõik lubatud toimingud, mis on määratletud andmete tüüp massiivi elemente. See tähendab, et kui massiiv koosneb täisarvudest, saab täisarvude jaoks määratletud toiminguid läbi viia selle elementide kohal, kui massiiv koosneb tähemärkidest, on nende suhtes kohaldatavad toimingud tähemärkidega.

Sisestage kahemõõtmeline massiiv pascal.

Ühemõõtmeliste massipealsete elementide järjestikuse sisendi jaoks kasutasime tsükli, mis muutis indeksi väärtust 1.-st viimasest. Kuid Pascali kahemõõtmelise massiendi elemendi asend määratakse kahe indektiga: joone number ja kolonni number. See tähendab, et me peame järjekindlalt muutma liini number alates 1.-st viimasest ja igas reas, et lahendada kolonnide elemendid alates 1. viimast. Niisiis, me vajame Tsüklite jaoks kaks ja üks neist investeeritakse teisesse.

Kaaluge näidet kahemõõtmelise massiivi paskali sisenemisest klaviatuurist:

Näide sisendprogrammi kahemõõtmelise massif Pascal klaviatuuri

tüüp
Maatriks \u003d massiiv täisarv;
var.
A ,: maatriks;
I, J: täisarv; (massiivi indeksid)
Alusta.
I: \u003d 1 kuni 5 do (tsükkel kõigi ridade büstide jaoks)
Readln ([i, j]); (I-R-rida ja J-veeru klaviatuurielemendi sisestamine)

Kahemõõtmelise Pascal massiivi saab täita juhuslikult, st Kasutage juhuslikku (N) funktsiooni, samuti määrake iga maatriksi elemendi väljenduse väärtus. Kahemõõtmelise Pascal massiivi täitmise meetod valitakse sõltuvalt komplektist, kuid igal juhul tuleb iga element määratleda igas reas ja igas veerus.

Kahemõõtmelise massif Pascali väljund ekraanil.

Pascali kahemõõtmelise massifilementide elementide väljund viiakse läbi ka seerias, on vaja printida iga rea \u200b\u200bja iga veeru elemendid. Samal ajal tahaksin, et elemendid, mis seisavad ühes reas, trükitud lähedal, st Stringis ja kolonni elemendid asuvad teise allpool. Selleks peate täitma järgmise tegevuse järjestuse (kaaluma programmi fragmenti eelmises näites kirjeldatud massiivi fragmenti):

Näide Pascal kahemõõtmelise massifist väljundprogrammist

i: \u003d 1 kuni 5 do (tsükkel kõigi ridade büstide jaoks)
Alusta.
J: \u003d 1 kuni 10 do (büst kõik elemendid stringide veerge)
Kirjutage ([I, J]: 4); (Printimine elemendid I-Th maatriksis ühes ekraanil ja 4 positsioone antakse iga elemendi väljundile)
WRITELN; (Enne liini arvu muutmist maatriksis peate kursor tõlkima uue ekraani rea algusesse)
lõpp;

Kommentaar ( see on tähtis!): Väga tihti õpilaste programmides esineb viga sisestades klaviatuuri või väljund massiivi ekraani üritab järgmiselt: Readln (a), WRITELN (A), kus aga - See on muutuv tüüpi massiiv. Samal ajal üllatad kompilaatori sõnum, et seda tüüpi muutujat ei saa pidada ega trükkida. Võib-olla mõistate, miks seda ei saa teha, kui esitate n kruusid järjest seisavad järjest ja kätes, näiteks veekeetja veega. Kas te saate meeskonna "vesi" täitke kõik ringid korraga? Ükskõik kui raske te proovite, kuid igas kruusis peate valama eraldi. Massiivi elementide ekraani täitmine ja väljund tuleb läbi viia ka järjestikku ja elementaalselt, sest Arvuti mälestuseks asuvad massiivi elemendid järjestikustes rakkudes.

PASCALi kahemõõtmelise massiivi esitlus mälul

Abstraktse massiivi elemendid masina mälestusel on füüsiliselt paigutatud järjestikku vastavalt kirjeldusele. Sel juhul võtab iga element mällu selle suurusele vastavate baitide arv. Näiteks kui massiiv koosneb täisarvelementidest, hõivab iga element kahte baiti. Ja kogu massiivi võtab s ^ 2 baiti, kus S on massiivi elementide arv.

Ja kui palju ruumi tekib massiiv, mis koosneb massiividest, st maatriks? Ilmselgelt: S i ^ s j, kus s i on ridade arv ja S J on iga rida üksuste arv. Näiteks tüübi massiivi jaoks

Maatriks \u003d massiiv täisarv;

see võtab 12 mälu baiti.

Kuidas selle massiivi elemendid asuvad mällu? Mõtle mälu maatriksi maatriksi massiivi.

Iga elemendi M tüüpi täisarv, kaks mälu rakud on esile tõstetud. Majutus mällu toimub "alt üles". Elemendid paigutatakse indeksi muutmise järjekorras, mis vastab lisatud tsüklite skeemile: Esiteks asetatakse esimene rida, seejärel teine, kolmas ... joone sees on elemendid: esimene, teine , jne.

Nagu me teame, on juurdepääs mis tahes muutujale võimalikuks ainult siis, kui mälukambri aadress on tuntud, kus muutuja salvestatakse. Konkreetse mälu eraldatakse programmi laadimisel muutuja jaoks, see tähendab, et muutuja ja raku aadressi vaheline vastastikune vastavus on määratud. Aga kui me kuulutasime muutujana massiivina, programm "teab" massiivi alguse aadressi, st selle esimene element. Kuidas juurdepääs kõikidele teiste massiivi elementidele toimub? Tegeliku juurdepääsu mälukambrisse, milles kahemõõtmelise massiivi element salvestatakse, arvutab süsteem selle aadressi valemiga:

ADDR + SIZLEM * COLS * (I -1) + sizelem * (J-1),

kus ADDR on tegelik esialgne aadress, mille abil massiiv asub mälu; I, J-elementide indeksid kahemõõtmelises massiivis; SizeLEM - massiivi elemendi suurus (näiteks kaks baiti täisarvude jaoks); Kollad - rida üksuste arv.

Väljend SUURELEM * COLS * (I -1) + siugelemm * (J-1) nimetatakse massiivi algusse nihkumise suhtes.

Kui palju mälu eraldatakse massiivi jaoks?

Mõelge mitte niivõrd, kui palju mälu eraldatakse massiivi jaoks (me demonteeriti eelmises osas), kuid mis on massiivi maksimaalne lubatud suurus, arvestades piiratud koguse mälu.

Programmi töötamiseks eraldatakse mälu 64 KB segmendid, vähemalt üks neist on määratletud kui andmete segment. Siin selles segmendis ja on need andmed, mida programm töötleb. Muutuva programmi ei saa asuda rohkem kui ühes segmendis. Seega, isegi kui segmendis asuvad ainult üks muutuja, mida segmendis asub, ei saa see rohkem kui 65536 baiti saada. Kuid peaaegu kindlasti lisaks massiivi andmegmendis kirjeldatakse mõningaid muutujaid, nii et tegelik mälu kogus, mida saab valida massiivi jaoks, on valemis: 65536- s, kus S on summa mälu juba valitud teiste muutujate jaoks.

Miks me seda vajame? Selleks et mitte olla üllatunud, kui tõlkija annab veateate liiga pika massiivi deklaratsioonile, kui programm on programmis (süntaksi seisukohast õige):

Tüüp MyArray \u003d massiiv täisarv;

Te teate juba, et täisarvu kahe baidiku esindatuse arvestades on realistlik deklareerida massiivi 65536/2 -1 \u003d 32767 elementide arvuga. Ja siis ainult siis, kui puuduvad muud muutujad. Kahemõõtmelised massiivid peaksid olema isegi väiksemad indeksi piirid.

Näited probleemide lahendamise probleemide kahemõõtmelise massiiviga Pascal

Ülesanne: Leia maatriksi mitte-nullist elementide toode.

Otsus:

  • Selle ülesande lahendamiseks on meil vaja muutujaid: maatriks, mis koosneb näiteks täisarvudest; P on elementide toode kui 0; I, J - massiiviindeksid; N, m - ridade ja veergude arv maatriksis.
  • Sisendandmed on n, m - nende väärtused sisenevad klaviatuurilt; Matrix - maatriksi sisestamine protseduuri kujul, täites maatriksi juhuslikult, s.o. Juhusliku () funktsiooni kasutamine.
  • Väljund on muutuja P (töö) väärtus.
  • Programmi õigsuse kontrollimiseks on vaja maatriksit ekraanile väljastada, et see väljastab maatriksi väljundprotseduuri.
  • Probleem lahendus Menetlus:

kõigepealt arutame peamise programmi täitmist, arutame menetluste rakendamist veidi hiljem:

  • tutvustame N ja M väärtusi;
  • Tutvustame Pascal kahemõõtmelise massiivi, sest me pöördume protseduuri VVOD (A), kus a - maatriks;
  • Printige saadud maatriks, et me pöördume printimisprotseduurile (a);
  • Me määrame muutuja p \u003d 1 algväärtuse;
  • Me jagame järjestikku kõik rida I 1.-n n-st., Iga rida me lahendame kõik veerud J alates 1.-st M-le, iga maatriksi elemendi jaoks kontrollime seisundit: kui IJ? 0, seejärel toode p on ühendada elementi IJ (p \u003d p * a ij);
  • Tühistage maatriksi nullielementide toote väärtus - P;

Ja nüüd räägime protseduuridest.

Kommentaar (see on tähtis!) Menetluse parameeter võib olla etteantud tüübi mis tahes muutuja, mis tähendab, et massiiviprotseduuri edastamiseks parameetrina tuleb eelnevalt kirjeldada. Näiteks:

Tüüp
Maatriks \u003d massiiv täisarv;
Menetlus Primer (A: maatriks);
..............................

Lähme nüüd meie menetlustele tagasi.

Matrixi sisendprotseduuri nimetatakse VVOD-le, protseduuri parameeter on maatriks ja see peaks olema selle tulemusena ülekantud põhiprogrammile, seetõttu tuleb parameeter edastada viitena. Siis näeb välja meie protseduuri pealkiri:

Menetlus VVOD (var M: maatriks);

Pesastatud tsüklite rakendamiseks vajame protseduuri ajal kohalikke muutujaid, näiteks k ja h. Matrixi täitmisalgoritmi on juba arutatud, nii et me seda ei korrata.

Menetluse maatriksi väljastamise protseduur nimetatakse printimiseks, protseduuri parameeter on maatriks, kuid sel juhul on sisendparameeter, seetõttu edastatakse see väärtus. Selle protseduuri pealkiri näeb välja selline:

Protseduuri printimine (M: maatriks);

Ja jällegi, et rakendada pesastatud tsüklite rakendamist menetluse raames, vajame loendureid, võimaldame neil viidata samale k ja h. Ekraani maatriksi väljundi algoritm kirjeldati ülalpool, kasutame seda kirjeldust.

Näide kahemõõtmelise Pascali kahemõõtmelise massiivi programmi

Programmi proizvedenie;
Tüüp
Maatriks \u003d massiiv täisarv;
Var.
A: maatriks;
N, m, i, j: bait;
P: täisarv;
Menetlus VVOD (var M: maatriks);
Var k, h: baid;
Alusta.
Sest I: \u003d 1 kuni n do (muutuja n protseduuri jaoks on globaalne ja seetõttu "tuntud")
J: \u003d 1 kuni M do (M protseduuri muutuja on globaalne ja seetõttu "tuntud")
M: \u003d juhuslik (10);
Lõpp;
Protseduuri printimine (M: maatriks);
Var k, h: baid;
Alusta.
I: \u003d 1 kuni n
Alusta.
J: \u003d 1 kuni m doo
Kirjutage (m: 4);
WRITELN;
lõpp;
Lõpp;
Alusta (peaprogrammi käivitamine)
WRITELN ("sisestage maatriksi mõõtme:");
Readln (n, m);
VVOD (a);
Prindi (a);
P: \u003d 1;
I: \u003d 1 kuni n
J: \u003d 1 kuni m doo
Kui A.<>0 Siis P: \u003d p * a;
WRITELN (p);
Lõpp.

Viimane õppetund Pascal kirjutati 7. märtsil, siis me demotseerisime. Täna õpime seda, mida kahemõõtmeline massiivi PascalisKuidas seda kirjeldatakse ja mida ta esindab. Loe edasi veelgi.

Niisiis, mis on kahemõõtmeline massiivi?Valguse tajumise jaoks ette kujutame ühemõõtmelise massiivi liinina ja mida kõik elemendid lähevad horisontaalselt ja kahemõõtmeliseks ruudukujuliseks, kus elemendid asuvad nii horisontaalselt kui ka vertikaalselt. Kahemõõtmeline massiiv koosneb joonedest ja veergudest, mida nimetatakse ka maatriksiks või maatriksi massiiviiks.

Kuidas kirjeldavad kahemõõtmelised massiivid? Kahemõõtmeliste massiivide kirjutamiseks on mitmeid viise, ma pean neist 2 kaaluma.

1 meetodi kirjeldus massiivi: massiivi tüüpi muutujaid massiiv (täisarv / reaalne / bait);

2 meetod massiivi kirjeldamiseks: massiiv massiivi tüüpi muutujaid massiivi;

Esmalt kirjeldage jooni (1..m) ja seejärel veerud (1..n).

Teises meetodis kirjeldatakse seda, nagu kaks ühemõõtmelise massiivi, mis koos moodustavad ühe kahemõõtmelise.

Kahemõõtmelise massiivi saab kirjeldada järgneva kaebuse tüübiosas mitu korda või varte varieeruvate kirjelduste puhul, ma tahan selle asemel tähelepanu pöörata m ja n asemel, saate asendada numbreid ja saate kasutada konstante .

Näide kahemõõtmelisest massiivi tööst muutuvates kirjeldustes jaotises:

CONST.
m \u003d 100;
n \u003d 100;
var.
A: massiiv täisarv;

Sel juhul seadsime kahemõõtmelise massiivi 100 inimese suuruse 100 kohta, st meil on ruudu maatriks.

Näide maatriksi massiivi ülesandeks, kasutades tüüpi osa:

CONST.
m \u003d 100;
n \u003d 100;
Tüüp
Maatriks \u003d massiiv täisarv;
var.
A: maatriks;
B: maatriks;

Teises näites seadsime kaks identset maatriksi massiivi mõõtmetega 100 100 kohta, kirjeldades massiivi B, me ei pea kirjeldama selle suuruse ja andmete tüüp uuesti.

Kuidas pääseda mobiiltelefoni kahemõõtmelise massiivi juurde pääseda?

Kahemõõtmelise massiivi viimiseks peate kõigepealt täpsustama numbri numbri ja seejärel kolonni number järgmiselt:

x-mis tahes muutuja, A - massiivi nimi, liin I-number, J - veeru number.

Veelgi enam, I ja J võivad olla nii muutujad kui ka täisarvud.

Näide andmete kirjutamise massiivi:

Sest i: \u003d 1 kuni n do // ülesanne rea silmus
J: \u003d 1 kuni M DE // Ülesande veeru numbri tsükli
A: \u003d juhuslik (100); // Rakkude numbri I ja juhusliku veeru numbri määramine

Me täitisime juhuslike numbritega massiivi 1 kuni 100-ni.

Programmi näide kahemõõtmelise massiivi abil, kus täidame massiivi juhuslikke numbreid ja kuvada see ekraanil:

VAR // muutujate kirjeldus ja massiiv
Matrix: massiiv täisarv;
I, J: täisarv;

Alusta // koduprogrammi
WRITELN ("kahemõõtmeline massiivi:"); // dialoog kasutajaga

I: \u003d 1 kuni 10 do // massiivi täitmine
J: \u003d 1 kuni 10
Maatriks: \u003d juhuslik (100);

I: \u003d 1 kuni 10 doing // massiivi väljund
J: \u003d 1 kuni 10
Kirjutage (maatriks, ");
WRITELN.
WRITELN (sait "); // Kui soovite, saate kustutada
lõpp; // programmi lõpp

// Readln // kasutatakse Turbo Pascal