14.5. Ispisati sve dvocifrene brojeve sa različitim ciframa (koristi dvije petlje i jedna IF naredba).

Opis rješenja: Zadatak je riješen kao prethodni uz promjenu logičkog izraza: i<>j.  Kao što se vidi izvođenju program nema brojeve 77, 88 kao ni 99. Prethodni dvocifreni brojevi sa istim ciframa (11, do 66) takođe nisu ispisani.

Listing programa:

REM 14111005
PRINT "Dvocifreni brojevi - razlicite cifre"
FOR i = 1 TO 9               : REM za cifre desetica od 1 do 9 radi
    FOR j = 0 TO 9           : REM za cifre jedinica od 0 do 9 radi
        : REM razlicite cifre?  
        IF i <> j THEN
            PRINT "i = "; i, " j = "; j, " dvocifreni broj = "; 10 * i + j  : REM ispis
        END IF
    NEXT j
NEXT i
END

Ispis na ekranu:

Index