8.3.. Izračunati sumu prirodnih brojeva u intervalu od k 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:

PROGRAM p08312014;
CLS
PRINT "Od broja: ";
INPUT K
PRINT "Do broja: ";
INPUT N
S = 0
I = K
DO
  IF I MOD 10 = 8 THEN
    S = S + I
  END IF
  I = I + 1
LOOP UNTIL I > N
PRINT "Suma je "; S
END

Ispis na ekranu:

Index