Program Pascal Nota Pembelanjaan

Program ini sengaja saya buat untuk memenuhi tugas kampus Mata Kuliah Struktur Data.

Sebenarnya tugas ini banyak teman sekelas yang belum berhasil jadi mendingan di sharing aja sebagai referensi kawan2...

program nota_blnja;
uses crt;
var nb : array [1..15,1..15] of string;       {penggunaan array dua dimensi}
    bb,hb,by : array [1..15,1..15] of integer;
    n : array [1..15] of integer;
    m,i,j,x : integer;
    dsk,jby,tb : array [1..15] of real;
    ulang : char;