Kod
DECLARE
aDane INT[] := '{1,2,3,4,5,6}';
i INT;
j INT;
BEGIN
i := 1;
WHILE aDane[ i ] IS NOT NULL LOOP
j:=i;
WHILE aDane[ j ] IS NOT NULL LOOP
RAISE NOTICE 'Twoj ciag to %-%', aDane[ i ], aDane[ j ];
j := j + 1;
END LOOP;
i := i + 1;
END LOOP;
END
co daje:
Cytat
Query OK (0,09 sec)
Return Value:
NOTICE: Twoj ciag to 1-1
NOTICE: Twoj ciag to 1-2
NOTICE: Twoj ciag to 1-3
NOTICE: Twoj ciag to 1-4
NOTICE: Twoj ciag to 1-5
NOTICE: Twoj ciag to 1-6
NOTICE: Twoj ciag to 2-2
NOTICE: Twoj ciag to 2-3
NOTICE: Twoj ciag to 2-4
NOTICE: Twoj ciag to 2-5
NOTICE: Twoj ciag to 2-6
NOTICE: Twoj ciag to 3-3
NOTICE: Twoj ciag to 3-4
NOTICE: Twoj ciag to 3-5
NOTICE: Twoj ciag to 3-6
NOTICE: Twoj ciag to 4-4
NOTICE: Twoj ciag to 4-5
NOTICE: Twoj ciag to 4-6
NOTICE: Twoj ciag to 5-5
NOTICE: Twoj ciag to 5-6
NOTICE: Twoj ciag to 6-6