8.2.. Izračunati sumu prirodnih brojeva u intervalu od 1 do n koji su djeljivi sa a.
Listing programa:
REM p08212011
CLS
PRINT "Do broja: ";
INPUT N
PRINT "Dijeljivi sa: ";
INPUT a
S = 0
I=1
WHILE I <= N
IF I MOD a = 0 THEN
S = S + I
END IF
I = I + 1
WEND
PRINT S
END
Ispis na ekranu:
Index
|