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

Opis rješenja:

Listing programa:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
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