8.1.. Pomnoži parne brojeve od A do B.

Opis rješenja:

Opis programa:

Listing programa:

REM p08111019;
CLS
INPUT "Unesi granice intervala:"; A, B
P = 1
FOR I = A TO B
  IF I / 2 = INT(I / 2) THEN P = P * I
NEXT I
PRINT "Proizvod je:"; P
END

Ispis na ekranu:

Index