8.1.. Suma neparnih prirodnih brojeva od 1 do 9.
Opis rješenja:
Opis programa:
Listing programa:
PROGRAM p08111063;
{suma prvih 9 neparnih prirodnih brojeva}
VAR { deklarisanje promjenljivih }
i, s : INTEGER; { cjelobrojne promjenljive }
BEGIN
WRITELN('suma neparnih od 1 do 9');
s := 0;
FOR i:=1 TO 9 DO { ponavljaj za i=1 do 9 - pocetak petlje }
IF i MOD 2 <> 0 THEN { neparan? }
s := s + i; { neparan, kumulativna suma }
WRITELN ('suma neparnih= ', s); { ispis u petlji }
READLN;
END.
Ispis na ekranu:
Index
|