14.. Ispisati trocifrene brojeve kod kojih je pri djeljenju sa 3
ostatak 1 (jedna petlja).
Opis rješenja: Zadatak je riješen korištenjem jedne FOR petlje. Provjera da li je ostatak dijeljenja trocifrenog broja sa 3 jednak 1 se izvodi logičkim izrazom IF i MOD 3 = 1 THEN.
Listing programa:
REM 14511014
PRINT "Trocifreni brojevi - djeljenju sa 3 ostatak 1"
FOR i = 100 TO 999 : REM za trocifrene brojeve radi
: REM djeljenju sa 3 ostatak 1?
IF i MOD 3 = 1 THEN
PRINT i; " "; : REM djeljenju sa 3 ostatak 1
END IF
NEXT i
END
Ispis na ekranu:
Index
|