8.1.. Izračunati sumu neparnih prirodnih brojeva u intervalu od k do n.

Opis programa: Po upisu granice intervala i postavlja se početna vrijednost sume (s=0). Zatim počinje FOR petlja. Prva vrijednost kontrolne varijable i je k. Naredba IF sadrži logički izraz i MOD 2 <> 0 (broj nije paran). Ako je ovaj logički izraz tačan tada se uvećava suma za vrijednost kontrolne varijable i. Proces se ponavalja dok vrijednost kontrolne varijable ne bude veća od n. Ispis je na kraju.

Listing programa:

REM p08112020
CLS

PRINT "Suma neparnih prirodnih brojeva u intervalu od k do n"
INPUT "Od broja"; k
INPUT "Do broja"; n
s = 0
FOR i = k TO n
  IF i MOD 2 <> 0 THEN s = s + i
NEXT i
PRINT "Suma neparnih prirodnih brojeva od"; k; "do"; n; "je"; s
END

Ispis na ekranu:

Index