8.1.. Napisati program za ispis trougla kao na slici sa željenim brojem redova:
.

Opis programa: Na slici je prikazan odnos redova i kolona.

Slika 1. Sporedna dijagonala i+j = n+1

Listing programa:

REM 08114011
PRINT "Trougao": REM naslov
INPUT "Broj redova: "; n: REM broj redova
INPUT "Znak "; znak$: REM znak
FOR i = 1 TO n
    FOR j = 1 TO n
        IF (i + j) = (n + 1) THEN
            PRINT znak$;: REM na sporednoj dijagonali znak
        END IF
        IF (i + j) > (n + 1) THEN
            PRINT znak$; znak$;: REM ispod sporedne dijagonale znak i znak
        END IF
        IF (i + j) < (n + 1) THEN
            PRINT " ";: REM iznad sporedne dijagonale prazno
        END IF

    NEXT j
    PRINT
NEXT i
END

Ispis na ekranu:

Index