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