Massiivid
Lahutab vektori B nendest ridadest, kus kõrvaldiagonaali element on positiivne.
n Maatriksi ridade arv.
A() Esialgne maatriks A.
B() Vektor B.
C() Uus maatriks C.
Uus maatriks C kuvatakse 1-realise vahega maatriksist A allapoole.
Funktsioon Yleminemin(A(), n, min)
Leiab minimaalse elemendi ülalpool peadiagonaali.
n Maatriksi ridade arv.
A() Maatriks A.
min Abimuutuja, mille abil leitakse väikseim element.
Minimaalne element kuvatakse töölehe lahtris "min".
Protseduur Uuedread(A(), D(), n)