Jabarkan Contoh kod (ALGOL 60) dari ALGOL dalam bahasa melayu

(Cara teks tebal ditulis bergantung kepada perlaksanaan, contoh: 'INTEGER' yang disertakan tanda pembuka kata bagi mewakili integer.)

procedure Absmax(a) Size:(n, m) Result:(y) Subscripts:(i, k);

value n, m; array a; integer n, m, i, k; real y;

comment The absolute greatest element of the matrix a, of size n by m

is transferred to y, and the subscripts of this element to i and k;

y := 0; i := k := 1;

for p:=1 step 1 until n do

for q:=1 step 1 until m do

if abs(a[p, q]) > y then

begin y := abs(a[p, q]);

i := p; k := q

Ini adalah contoh bagi menghasilkan jadual dengan menggunakan Elliott 803 ALGOL.

FOR A:= 0.0 STEP D UNTIL 6.3 DO

PUNCH(3) output kepada pencetak dan bukannya penebuk tape.

SAMELINE menghalang carriage return + line feed yangbiasanya dicetak antara pernyataan.

ALIGNED(1,6) mengawal format output dangan 1 digit sebelum dan 6 selepas titik perpuluhan.

Variasi dan ketiadaan pemindahan bagi aturcara dari satu perlaksanaan dengan yang lain dapat ditonjulkan dengan mudah melalui aturcara hello dunia.