8.1.. Napisati program za računanje sume cifara 10 učitanih prirodnih brojeve.

Opis rješenja:

Listing programa:

REM 0811218 
CLS
FOR i = 1 TO 10
    PRINT "Unesi "; i;". broj";
    INPUT "broj ", n
    DO
        k = n MOD 10
        s = s + k
        n = INT(n / 10)
    LOOP UNTIL n = 0 
    i = i + 1
NEXT i
PRINT "Suma je: ", s
END

Ispis na ekranu:

Index