8.1.. Ispisati prvih a parnih prirodnih brojeva počevši od učitane vrijednosti k.
Opis rješenja:
Listing programa:
REM 08112180
CLS
br = 0
INPUT "Unesi pocetnu vrijednost: "; k
INPUT "broj brojeva: "; a
FOR i = k TO k + 2 * a
IF (i MOD 2 = 0) AND (br < a) THEN
PRINT i
br = br + 1
END IF
NEXT i
END
II Varijanta
REM 08112180 -
CLS
INPUT "Unesi pocetnu vrijednost: ", k
INPUT "Unesi broj parnih brojeva: ", a
FOR i = 1 TO 2 * a : REM princip 2n+1 prolaza da bi izabrali parne brojeve iz opsega
IF k MOD 2 = 0 THEN
PRINT k
END IF
k = k + 1
NEXT
END
Ispis na ekranu:
Index
|