8.3.. Napisati program za ispis aritmetičke sredine
neparnih prirodnih brojeva do n.
Opis rješenja: Izdvajanje naparnih se izvodi logičkim izrazom i MOD 2 <> 0 u intervalu od 1 do n.
Listing programa:
REM p08313014
CLS
PRINT "Do broja: ";
INPUT N
S = 0
BR = 0
I=1
DO
IF I MOD 2 >< 0 THEN
S = S + I
BR = BR + 1
ENDIF
I = I+1
LOOP UNTIL I > N
AS = S / BR
PRINT "ARITMETICKA SREDINA NEPARNIH PRIRODNIH BROJEVA OD 1 DO "; N; " je "; AS
END
Ispis na ekranu:
Index
|