8.2.. Napisati program za prebrojavanje neparnih brojeva od 1 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). WHILE petlja je od 1 do n.

Listing programa:

REM 08212076 prebrojati neparne prirodne brojeve od 1 do n
CLS
PRINT "Do broja: ";
INPUT N
BR = 0
I = 1
WHILE I <= N
  IF I MOD 2 >< 0 THEN
    BR = BR + 1
  ENDIF
  I = I + 1 
WEND
PRINT "Broj neparnih brojeva do "; N; " je : " ; BR
END

II Verzija
REM p08212047_1 prebrojati neparne prirodne brojeve od 1 do n
CLS
PRINT "Do broja: ";
INPUT N
BR = 0
I = 1
WHILE I <= N
  BR = BR + 1
  I = I + 2 
WEND
PRINT "Broj neparnih brojeva do "; N; " je : " ; BR
END

Ispis na ekranu:

Index