8.3.. Izračunati sumu prirodnih brojeva u intervalu od 1 do n čija je cifra jedinica 8.

Opis rješenja: Cifra jedinica se dobija kao ostatak dijeljenjem sa 10 (i MOD 10 = 8). Djeljivost

Listing programa:

REM p08312013;
CLS
PRINT "Do broja: ";
INPUT N
S = 0
I = 1
DO
  IF I MOD 10 = 8 THEN
    S = S + I
  END IF
  I = I + 1
LOOP UNTIL I > N
PRINT  S
END

Ispis na ekranu:

Index