Array dua dimensi dalam Pascal diperlakukan sebagai array satu dimensi yang tipe elemennya juga berupa array (array of array). Posisi elemen dalam array Pascal dua dimensi dijelaskan oleh dua indeks. Mereka dapat disajikan dalam bentuk tabel atau matriks persegi panjang.
Pertimbangkan array Pascal dua dimensi dengan dimensi 3*3, artinya, ia akan memiliki tiga garis, dan setiap baris akan memiliki tiga elemen:
Setiap elemen memiliki nomornya sendiri, seperti array satu dimensi, tetapi sekarang nomor tersebut sudah terdiri dari dua angka - nomor baris di mana elemen tersebut berada, dan nomor kolom. Jadi, nomor elemen ditentukan oleh perpotongan baris dan kolom. Misalnya, 21 adalah elemen yang muncul pada baris kedua dan kolom pertama.
Deskripsi array Pascal dua dimensi.
Ada beberapa cara untuk mendeklarasikan array Pascal dua dimensi.
Kita telah mengetahui cara mendeskripsikan array satu dimensi, yang elemen-elemennya dapat bertipe apa pun, dan oleh karena itu, elemen-elemen itu sendiri dapat berupa array. Perhatikan uraian tipe dan variabel berikut ini:
Contoh deskripsi array Pascal dua dimensiJenis
Vektor = larik<тип_элементов>;
Matriks= susunan vektor;
Var m: matriks;
Kita telah mendeklarasikan array Pascal dua dimensi m, terdiri dari 10 baris, yang masing-masing memiliki 5 kolom. Dalam hal ini, setiap baris ke-i dapat diakses dengan m[i], dan setiap elemen ke-j dalam baris ke-i dapat diakses dengan m[i,j].
Definisi tipe array Pascal dua dimensi juga dapat ditentukan dalam satu baris:
Jenis
Matriks = array dari array< тип элементов >;
atau bahkan lebih sederhana:
jenis
matriks = array dari<тип элементов>;
Akses elemen array dua dimensi berbentuk: M [i, j]. Artinya kita ingin mendapatkan elemen yang terletak pada baris ke-i dan kolom ke-j. Hal utama di sini adalah jangan mengacaukan baris dengan kolom, jika tidak, kita mungkin akan mengakses elemen yang tidak ada lagi. Misalnya, mengakses elemen M memiliki notasi yang benar, tetapi dapat menyebabkan kesalahan pada program.
Operasi dasar dengan array Pascal dua dimensi
Segala sesuatu yang telah dikatakan tentang operasi dasar dengan array satu dimensi juga berlaku untuk matriks. Satu-satunya tindakan yang dapat dilakukan pada seluruh matriks bertipe sama adalah penugasan. Artinya, jika program kita mendeskripsikan dua matriks bertipe sama, misalnya,
jenis
matriks= susunan bilangan bulat;
var
a, b: matriks;
kemudian selama eksekusi program Anda dapat menetapkan matriks A nilai matriks B(Sebuah:= b). Semua tindakan lainnya dilakukan elemen demi elemen, dan semua operasi valid yang ditentukan untuk tipe data elemen array dapat dilakukan pada elemen tersebut. Ini berarti bahwa jika array terdiri dari bilangan bulat, maka operasi yang ditentukan untuk bilangan bulat dapat dilakukan pada elemennya, tetapi jika array terdiri dari karakter, maka operasi yang ditentukan untuk bekerja dengan karakter dapat diterapkan pada elemen tersebut.
Masukan array Pascal dua dimensi.
Untuk memasukkan elemen array satu dimensi secara berurutan, kami menggunakan perulangan for di mana kami mengubah nilai indeks dari yang pertama ke yang terakhir. Namun posisi suatu elemen dalam array Pascal dua dimensi ditentukan oleh dua indeks: nomor baris dan nomor kolom. Ini berarti kita perlu mengubah nomor baris secara berurutan dari tanggal 1 hingga terakhir dan di setiap baris melakukan iterasi melalui elemen kolom dari tanggal 1 hingga terakhir. Jadi kita perlu dua untuk lingkaran, dan salah satunya akan disarangkan di dalam yang lain.
Mari kita lihat contoh memasukkan array Pascal dua dimensi dari keyboard:
Contoh program untuk memasukkan array Pascal dua dimensi dari keyboardjenis
matriks= susunan bilangan bulat;
var
a, : matriks;
saya, j: bilangan bulat; (indeks array)
mulai
for i:=1 to 5 do (perulangan untuk mengulangi semua baris)
bacaln(a[i,j]); (input keyboard dari elemen pada baris ke-i dan kolom ke-j)
Array dua dimensi Pascal dapat diisi secara acak, yaitu gunakan fungsi acak (N), dan tetapkan juga nilai beberapa ekspresi untuk setiap elemen matriks. Metode untuk mengisi array Pascal dua dimensi bergantung pada tugas yang ada, tetapi bagaimanapun juga, setiap elemen di setiap baris dan setiap kolom harus didefinisikan.
Mencetak array Pascal dua dimensi ke layar.
Pencetakan elemen array Pascal dua dimensi juga dilakukan secara berurutan; elemen setiap baris dan kolom harus dicetak. Pada saat yang sama, saya ingin elemen-elemen pada baris yang sama dicetak berdampingan, mis. menjadi satu baris, dan elemen kolom terletak satu di bawah yang lain. Untuk melakukan ini, Anda perlu melakukan urutan tindakan berikut (pertimbangkan bagian program untuk array yang dijelaskan dalam contoh sebelumnya):
Contoh program untuk mencetak array Pascal dua dimensifor i:=1 to 5 do (perulangan untuk mengulangi semua baris)
mulai
untuk j:=1 hingga 10 do (iterasi semua elemen baris demi kolom)
tulis(a[i,j]:4); (mencetak elemen yang terletak pada baris ke-i matriks dalam satu garis layar, dengan 4 posisi dialokasikan untuk menampilkan setiap elemen)
tulis; (sebelum mengubah nomor baris dalam matriks, Anda perlu memindahkan kursor ke awal baris layar baru)
akhir ;
Catatan ( itu penting!): sering sekali pada program pelajar terjadi error ketika mencoba masuk dari keyboard atau menampilkan array sebagai berikut: readln(a), writeln(a), dimana A adalah variabel array. Pada saat yang sama, mereka dikejutkan oleh pesan kompiler bahwa variabel jenis ini tidak dapat dibaca atau dicetak. Mungkin Anda akan mengerti mengapa hal ini tidak dapat dilakukan jika Anda membayangkan N mug berdiri berjajar, dan di tangan Anda, misalnya, ada ketel berisi air. Bisakah Anda menggunakan perintah “tuangkan air” untuk mengisi semua mug sekaligus? Tidak peduli seberapa keras Anda mencoba, Anda harus menuangkannya ke dalam setiap cangkir secara terpisah. Pengisian dan tampilan elemen array juga harus dilakukan secara berurutan dan elemen demi elemen, karena Dalam memori komputer, elemen array terletak di sel yang berurutan.
Representasi array Pascal dua dimensi dalam memori
Elemen array abstrak dalam memori mesin secara fisik ditempatkan secara berurutan, sesuai dengan deskripsi. Dalam hal ini, setiap elemen menempati jumlah byte dalam memori sesuai dengan ukurannya. Misalnya, jika sebuah array terdiri dari elemen bertipe integer, maka setiap elemen akan menempati dua byte. Dan seluruh array akan memakan S^2 byte, di mana S adalah jumlah elemen dalam array.
Dan berapa banyak ruang yang dibutuhkan oleh array yang terdiri dari array, mis. matriks? Jelasnya: S i^S j, dimana S i adalah banyaknya garis, dan S j adalah banyaknya elemen pada setiap baris. Misalnya, untuk array seperti
Matriks = array bilangan bulat;
Diperlukan memori 12 byte.
Bagaimana elemen array ini ditempatkan di memori? Mari kita pertimbangkan tata letak array M bertipe matriks di memori.
Untuk setiap elemen M bertipe integer, dua sel memori dialokasikan. Penempatan memori dilakukan dari bawah ke atas. Elemen ditempatkan dalam urutan perubahan indeks, yang sesuai dengan pola loop bersarang: baris pertama ditempatkan terlebih dahulu, lalu baris kedua, ketiga... Di dalam baris, elemen disusun secara berurutan: pertama, kedua, dst.
Seperti yang kita ketahui, akses ke variabel apa pun hanya dimungkinkan jika alamat sel memori tempat variabel disimpan diketahui. Memori khusus dialokasikan untuk variabel ketika program dimuat, yaitu korespondensi timbal balik dibuat antara variabel dan alamat sel. Tetapi jika kita mendeklarasikan suatu variabel sebagai array, maka program “mengetahui” alamat awal array, yaitu elemen pertamanya. Bagaimana Anda mengakses semua elemen array lainnya? Saat sebenarnya mengakses sel memori yang menyimpan elemen array dua dimensi, sistem menghitung alamatnya menggunakan rumus:
Tambahkan + SizeElem * Cols *(I -1)+ SizeElem *(J -1),
di mana Addr adalah alamat awal sebenarnya di mana array berada di memori; I, J – indeks elemen dalam array dua dimensi; SizeElem – ukuran elemen array (misalnya, dua byte untuk elemen bertipe integer); Cols – jumlah elemen dalam baris.
Ekspresi SizeElem * Cols *(I -1)+ SizeElem *(J -1) disebut offset relatif terhadap awal array.
Berapa banyak memori yang dialokasikan untuk array?
Mari kita pertimbangkan bukan pertanyaan tentang berapa banyak memori yang dialokasikan untuk array (kita telah membahasnya di bagian sebelumnya), tetapi berapa ukuran maksimum array yang diperbolehkan, mengingat jumlah memori yang terbatas.
Untuk pengoperasian program, memori dialokasikan dalam segmen masing-masing 64 KB, dan setidaknya satu di antaranya didefinisikan sebagai segmen data. Di segmen inilah data yang akan diproses oleh program berada. Tidak ada variabel program yang dapat ditempatkan di lebih dari satu segmen. Oleh karena itu, meskipun hanya ada satu variabel di segmen tersebut, yang digambarkan sebagai array, variabel tersebut tidak akan dapat menerima lebih dari 65536 byte. Namun hampir pasti, selain array, beberapa variabel lain akan dijelaskan di segmen data, sehingga jumlah sebenarnya memori yang dapat dialokasikan untuk array dicari dengan rumus: 65536-S, di mana S adalah jumlah memori sudah dialokasikan untuk variabel lain.
Mengapa kita perlu mengetahui hal ini? Agar tidak heran jika, selama kompilasi, penerjemah menampilkan pesan kesalahan tentang mendeklarasikan array yang terlalu panjang, ketika program menemukan deskripsi (benar dari sudut pandang sintaksis):
Ketik myArray= array bilangan bulat;
Anda telah mengetahui bahwa, dengan representasi bilangan bulat dua byte, sebenarnya dimungkinkan untuk mendeklarasikan array dengan jumlah elemen sama dengan 65536/2 –1=32767. Dan hanya jika tidak ada variabel lain. Array dua dimensi harus memiliki batas indeks yang lebih kecil lagi.
Contoh penyelesaian masalah dengan array Pascal dua dimensi
Tugas: Temukan produk elemen matriks bukan nol.
Larutan:
- Untuk mengatasi masalah ini kita memerlukan variabel: matriks yang terdiri, misalnya, elemen bilangan bulat; P – hasil kali unsur-unsur selain 0; I, J – indeks array; N, M – jumlah baris dan kolom dalam matriks.
- Data masukannya adalah N, M – kita akan memasukkan nilainya dari keyboard; matriks – kita akan memasukkan matriks dalam bentuk prosedur; kita akan mengisi matriks secara acak, yaitu menggunakan fungsi acak().
- Data keluarannya akan menjadi nilai variabel P (produk).
- Untuk memeriksa kebenaran pelaksanaan program, perlu untuk menampilkan matriks di layar; untuk ini kami akan memformalkan prosedur untuk menampilkan matriks.
- Kemajuan dalam memecahkan masalah:
Mari kita bahas dulu eksekusi program utama; kita akan membahas implementasi prosedurnya nanti:
- mari masukkan nilai N dan M;
- Mari kita perkenalkan array Pascal dua dimensi, untuk ini kita beralih ke prosedur vvod (a), di mana a adalah matriks;
- Mari kita cetak matriks yang dihasilkan; untuk melakukan ini, gunakan prosedur print (a);
- Mari kita tetapkan nilai awal ke variabel P =1;
- Kita akan melakukan iterasi secara berurutan melalui semua baris I dari tanggal 1 hingga ke-N, di setiap baris kita akan melakukan iterasi melalui semua kolom J dari tanggal 1 hingga ke-M, untuk setiap elemen matriks kita akan memeriksa kondisinya: jika a ij ? 0, maka hasil kali P akan dikalikan dengan unsur a ij (P = P * a ij);
- Mari kita tampilkan nilai hasil kali elemen matriks bukan nol – P;
Sekarang mari kita bicara tentang prosedur.
Komentar (itu penting!) Parameter prosedur dapat berupa variabel apa pun dengan tipe yang telah ditentukan sebelumnya, yang berarti bahwa untuk meneruskan array sebagai parameter ke suatu prosedur, tipenya harus dijelaskan terlebih dahulu. Misalnya:
Jenis
Matriks=array bilangan bulat;
prosedur primer(a: matriks);
..............................
Sekarang mari kita kembali ke prosedur kita.
Prosedur untuk memasukkan matriks disebut vvod, parameter dari prosedur tersebut adalah matriks, dan sebagai hasilnya, harus diteruskan ke program utama, oleh karena itu, parameter tersebut harus diteruskan dengan referensi. Maka header prosedur kita akan terlihat seperti ini:
Prosedur vvod (var m: matriks);
Untuk mengimplementasikan loop bersarang dalam suatu prosedur, kita memerlukan variabel counter lokal, misalnya k dan h. Algoritma pengisian matriks sudah dibahas, jadi kami tidak akan mengulanginya.
Prosedur untuk menampilkan matriks di layar disebut print , parameter dari prosedur ini adalah matriks, tetapi dalam hal ini merupakan parameter masukan, oleh karena itu, diteruskan dengan nilai. Header dari prosedur ini akan terlihat seperti ini:
Prosedur cetak(m:matriks);
Dan sekali lagi, untuk mengimplementasikan loop bersarang di dalam suatu prosedur, kita memerlukan penghitung, biarkan namanya sama - k dan h. Algoritma untuk menampilkan matriks di layar telah dijelaskan di atas;
Contoh program array dua dimensi PascalProduksi program;
Jenis
Matriks=array bilangan bulat;
Var
J: matriks;
N, m, saya, j: byte;
P: bilangan bulat;
Prosedur vvod (var m: matriks);
Var k, h: byte;
Mulai
Untuk i:=1 hingga n do (variabel n untuk prosedur bersifat global, dan oleh karena itu “diketahui”)
Untuk j:=1 hingga m do (variabel m untuk prosedur bersifat global, dan oleh karena itu “diketahui”)
M:= acak(10);
Akhir;
Prosedur cetak(m:matriks);
Var k, h: byte;
Mulai
Untuk i:=1 sampai n lakukan
mulai
Untuk j:=1 sampai m lakukan
Menulis(M:4);
menulis;
akhir ;
Akhir ;
Begin (awal program utama)
Writeln("Masukkan dimensi matriks :");
Bacaln(N,M);
Vvod(a);
Cetak(a);
P:=1;
Untuk i:=1 sampai N lakukan
Untuk j:=1 sampai M lakukan
Jika sebuah<>0 lalu p:=p*a;
Tulis(p);
Akhir.
Array dua dimensi struktur data yang menyimpan matriks persegi panjang berbentuk:
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... ... ... ... ... ... ... A n1 A n2 A n3 A n4 A n5...A nm
- Dalam suatu matriks, setiap elemen ditentukan oleh nomor baris dan nomor kolom pada titik potong elemen tersebut
- Dalam Pascal, array dua dimensi diperlakukan sebagai array yang elemen-elemennya adalah array linier(array dari array). Dua deskripsi array dua dimensi berikut ini identik var mass:array dari array nyata; var massa:array nyata;
- Matriks yang jumlah barisnya sama dengan jumlah kolomnya disebut matriks matriks persegi.
- Untuk mengakses elemen matriks, Anda harus menggunakan dua indeks yang menunjukkan nomor baris dan nomor kolom. Misalnya Arr Saya1. Dalam hal ini, elemen array (MyArr1) berada di baris keempat dan kolom kelima.
- Segala sesuatu yang telah dikatakan tentang operasi dasar dengan array satu dimensi juga berlaku untuk matriks. Saat melakukan iterasi melalui array elemen demi elemen dalam satu loop, variabel bertindak sebagai indeks tipe bilangan bulat. Secara tradisional, pengidentifikasi “ digunakan untuk menunjukkan indeks baris Saya “, dan kolom – “ J “.
- Pemrosesan matriks terdiri dari pertama-tama mempertimbangkan elemen-elemen baris (kolom) pertama, kemudian yang kedua, dan seterusnya hingga yang terakhir.
- Jika nomor baris suatu elemen cocok dengan nomor kolom ( saya = j), ini berarti elemen tersebut terletak diagonal utama matriks.
- Jika suatu elemen terletak pada sisi diagonalnya, maka indeks-indeksnya berhubungan dengan jumlah elemen ( N) dengan persamaan berikut: saya + j = n + 1
Deskripsi array dua dimensi
Ada beberapa cara untuk mendeklarasikan (mendeskripsikan) array dua dimensi dalam Pascal.
Deskripsi Awal Tipe Array
ketik matriks = array bilangan bulat; (array bilangan bulat) var mass:matrix;Mendefinisikan variabel sebagai array tanpa terlebih dahulu mendeklarasikan tipe array
var massa:array bilangan bulat;Menginisialisasi array dua dimensi
Saat menginisialisasi array dua dimensi, setiap baris diapit oleh tanda kurung tambahan:
Massa konstan:array = ((2,3,1,0), (1,9,1,3), (3,5,7,0));
Input/output nilai elemen array dua dimensi
Sangat sering, nilai elemen array dimasukkan dari keyboard. Metode menentukan informasi ini terlalu memakan waktu ketika bekerja dengan array besar. Untuk men-debug algoritma kelas luas, masukan informasi tersebut harus diganti dengan pembentukan elemen array secara acak. Untuk melakukan ini, gunakan prosedur ini mengacak dan fungsi acak. Saat bekerja dengan array dua dimensi, loop bersarang digunakan (biasanya loop dengan parameter untuk).
Mengisi array dengan angka acak
konstanta n = 5; m = 10; var i, j: bilangan bulat; matriks:array bilangan bulat; mulai mengacak; for i:= 1 to n do (akses ke baris array) for j:= 1 to m do (akses elemen demi elemen ke kolom) matriks := random(100); (kami menempatkan nomor acak dari interval :4 di elemen saat ini); tulis (buka garis baru setelah keluar dari loop dalam) end;Contoh pemecahan masalah
Contoh 1
Rumusan masalah. Diberi bilangan bulat positif M dan N. Bentuklah matriks bilangan bulat berukuran M × N, yang semua elemen kolom ke-J bernilai 5·J (J = 1, …, N).
Konstanta m = 7; n = 10; var i, j:bita; matriks:array bilangan bulat; mulai untuk i:= 1 sampai m lakukan untuk j:= 1 sampai n lakukan matriks := 5 * j; ... (Keluaran susunan)
Contoh 2
Rumusan masalah. Diberikan bilangan bulat positif M, N dan himpunan bilangan M. Bentuklah matriks berukuran M × N, yang setiap kolomnya berisi semua bilangan dari himpunan aslinya (dalam urutan yang sama).
Konstanta m = 5; n = 7; vektor:array bilangan bulat = (3, 5, 2, 7, 4); var i, j:bita; matriks:array bilangan bulat; mulai untuk j:= 1 sampai n do (ambil kolom ke-j) untuk i:= 1 sampai m do (akses elemen kolom ke-j per baris) matriks := vektor[i]; (implementasi) ... (Output dari array dua dimensi yang dihasilkan)
Pekerjaan rumah
- Diberikan bilangan bulat positif M dan N. Bentuklah matriks bilangan bulat berukuran M × N, yang didalamnya semua elemen baris pertama mempunyai nilai 10·I (I = 1, …, M).
- Diberikan bilangan bulat positif M, N dan himpunan N bilangan. Bentuklah matriks berukuran M × N, yang setiap barisnya memuat semua bilangan dari himpunan aslinya (dalam urutan yang sama).
- Selain itu. Diberikan bilangan bulat positif M, N, bilangan D dan himpunan M bilangan. Bentuklah matriks berukuran M × N, yang kolom pertama berimpit dengan himpunan bilangan asli, dan elemen-elemen pada setiap kolom berikutnya sama dengan jumlah elemen yang bersesuaian pada kolom sebelumnya dan bilangan D (sebagai hasilnya , setiap baris matriks akan memuat unsur-unsur barisan aritmatika).
- Selain itu. Diberikan matriks berukuran M × N. Cetaklah elemen-elemennya yang terletak pada baris-baris dengan bilangan genap (2, 4, ...). Tampilkan elemen baris demi baris, jangan gunakan operator kondisional.
Pelajaran Pascal terakhir ditulis pada tanggal 7 Maret, ketika kami sedang belajar. Hari ini kita akan mencari tahu apa itu array dua dimensi dalam pascal bagaimana hal itu dijelaskan dan apa itu. Lebih detailnya di bawah ini.
Jadi apa itu array dua dimensi? Untuk memudahkan pemahaman, mari kita bayangkan array satu dimensi sebagai garis, yang semua elemennya saling mengikuti secara horizontal, dan array dua dimensi sebagai persegi, yang elemen-elemennya terletak secara horizontal dan vertikal. Array dua dimensi terdiri dari baris dan kolom, disebut juga matriks atau array matriks.
Bagaimana penjelasan array dua dimensi? Ada beberapa cara untuk menulis array dua dimensi, saya akan membahas 2 di antaranya.
1 cara untuk mendeskripsikan array: array tipe variabel dalam array (integer/real/byte);
Cara ke-2 untuk mendeskripsikan array: array dari array dengan tipe variabel dalam array;
Pertama baris (1..m) dijelaskan, dan kemudian kolom (1..n).
Metode kedua menjelaskan bagaimana dua array satu dimensi dijelaskan, yang bersama-sama membentuk satu array dua dimensi.
Array dua dimensi dapat dijelaskan di bagian Tipe, untuk akses selanjutnya beberapa kali, atau di bagian deskripsi variabel Var. Saya ingin menunjukkan bahwa alih-alih m dan n, Anda dapat mengganti angka, atau Anda bisa menggunakan konstanta.
Contoh penentuan array dua dimensi pada bagian deskripsi variabel:
Konstan
m = 100;
n = 100;
var
a: Array bilangan bulat;
Dalam hal ini, kita telah menentukan array dua dimensi a berukuran 100 kali 100, yaitu kita memiliki matriks persegi.
Contoh penentuan array matriks menggunakan bagian Type:
Konstan
m = 100;
n = 100;
Jenis
Matriks = Array bilangan bulat;
var
a: Matriks;
b:Matriks;
Pada contoh kedua, kita menentukan dua larik matriks identik berukuran 100 kali 100; saat mendeskripsikan larik b, kita tidak perlu mendeskripsikan dimensi dan tipe datanya lagi.
Bagaimana cara mengakses variabel sel dalam array dua dimensi?
Untuk mengakses array dua dimensi, Anda harus menentukan nomor baris terlebih dahulu, lalu nomor kolom sebagai berikut:
x adalah variabel apa pun, a adalah nama array, i adalah nomor baris, j adalah nomor kolom.
Selain itu, i dan j dapat berupa variabel atau bilangan bulat.
Contoh penulisan data ke dalam array:
Untuk i:= 1 hingga n do //mengatur nomor baris dalam loop
Untuk j:=1 hingga m lakukan //atur nomor kolom dalam loop
a:=acak(100); //menetapkan nilai acak ke sel dengan nomor baris i dan nomor kolom j
Kami mengisi array dengan angka acak dari 1 hingga 100.
Contoh program yang menggunakan array dua dimensi, di mana kita mengisi array dengan angka acak dan menampilkannya di layar:
Var //deskripsi variabel dan array
Matriks: Array bilangan bulat;
saya, j: bilangan bulat;
Mulai //awal program utama
writeln("Array Dua Dimensi : "); //Dialog dengan pengguna
Untuk i:= 1 sampai 10 lakukan //mengisi array
untuk j:= 1 sampai 10 lakukan
Matriks:=acak(100);
Untuk i:= 1 hingga 10 lakukan mulai //Output array
untuk j:= 1 sampai 10 lakukan
tulis(matriks, " ");
menulis
writeln("situs"); //Jika diinginkan, Anda dapat menghapus
akhir; //Akhir program
//readln //digunakan di Turbo Pascal
Memuat...