14.23. Ispisati dvocifrene brojeve djeljive sa 3.
Opis rješenja: Provjera djeljivosti se izvodi po principu da li je ostatak dijeljenja sa 3 jednak nuli (naredba MOD).
Za provjeru ostatka koristi se naredba MOD. Za slučajeve kad je ostatak dijeljenja 3 jednak 0 izračunava se kumulativna suma s:=s+i. Primjeri ostatka dijeljenja sa 3:
0 MOD 3 = 0
1 MOD 3 = 1
2 MOD 3 = 2
3 MOD 3 = 0
4 MOD 3 = 1
5 MOD 3 = 2
6 MOD 3 = 0
Listing programa:
PROGRAM dvoc14_23;
USES
WinCrt;
VAR
i, s : INTEGER;
BEGIN
s := 0;
FOR i := 10 TO 99 DO
IF i MOD 3 = 0 THEN
s := s + i;
WRITELN('suma djeljivih sa tri = ', s);
END.
Izvođenje programa:
Daljnji rad:
 |
 |
 |
 |
 |
 |
 |
