8.1.. Napisati program da nađe proizvod prirodnih brojeva od a do b i koliko ih ima.

Opis rješenja:

Listing programa:

REM p08112077
CLS
BROJ = 0
PROIZVOD = 1
INPUT "Unesite broj a: ", a
INPUT "Unesite broj b: ", b
IF b < 0 THEN
PRINT "BROJ NIJE PRIRODAN"
GOTO 100
ELSEIF b < 0 THEN 
PRINT "BROJ NIJE PRIRODAN"
GOTO 100
ELSE
FOR I = a TO b
  PROIZVOD = PROIZVOD * I
  BROJ = BROJ + 1
NEXT I
END IF 
PRINT "Prirodnih brojeva u intervalu od", a "do", b "ima", BROJ "a njihov prozivod iznosi: ", PROIZVOD
100 END

Ispis na ekranu:

Index