8.1.. Napisati program za prebrojavanje neparnih brojeva od k do n.
Opis rješenja: Zadatak se rješava postavljanjem početne vrijednosti za brojač br=0; a naredba za uvečavanje brojača je (br=br+1). Logički izraz za provjeru parnosti je i MOD 2 = 1 (neparan broj). FOR petlja je od k do n.
Listing programa:
REM 08142076
CLS
BROJ = 0
INPUT "Unesite broj k: ", k
INPUT "Unesite broj n: ", n
FOR I = k TO n
IF I MOD 2 <> 0 THEN
BROJ = BROJ + 1
END IF
NEXT I
PRINT "Neparnih brojeva u intervalu od", k "do", n "ima", BROJ
END
Ispis na ekranu:
Index
|