7.1.. Provjeriti da li je od dva upisana broja prvi djeljiv sa drugim.

Opis rješenja: Prvo se sa tastature upisuju dvije vrijednosti (a, b). Provjera da li je prvo upisani broj (a) djeljiv sa drugim se izvodi sa logičkim izrazoma / b = INT(a / b) u naredbi IF. Ako je logički izraz istinit ispisuje se na ekranu DJELJIV, inače nema ispisa. Sa naredboma / b = INT(a / b) se izračunava ostatak dijeljenja broja a sa brojem b. Ostatak dijeljenja je jednak 0 ako je broj a djeljiv sa brojem b. Logički izraz za provjeru djeljivosti (a / b = INT(a / b) je istinit ako je a djeljivo sa b i tada se na ekranu ispisuje DJELJIV. Inače za ostale slučajeve nema ispisa.

Opis programa: Poslije upisa vrijednosti varijabli a i b sa tastature,  provjerava se da li je a djeljivo sa b. Logički izraz u naredbi IF glasi a / b = INT(a / b). Ako je logički izraz istinit ispisuje se DJELJIV.

Listing programa:

REM P07111006
CLS
INPUT "Vasi brojevi"; a, b
IF a / b = INT(a / b) THEN
   PRINT "Djeljiv"
END IF
END

Ispis na ekranu:

Index