8.2..Pomnoži parne brojeve od A do B.
Listing programa:
REM 08211019;
CLS
PRINT "Od broja: ";
INPUT A
PRINT "Do broja: ";
INPUT B
P=1
I = A
WHILE I <= N
IF I MOD 2 = 0 THEN
P = P * I
END IF
I = I + 1
WEND
PRINT "PROIZVOD PRIRODNIH PARNIH BROJEVA OD "; A ; " DO "; B; " je "; P
END
Ispis na ekranu:
Index
|