8.1.. Suma neparnih prirodnih brojeva od 1 do m.
Opis rješenja:
Opis programa:
Listing programa:
PROGRAM p08111070;
{Suma neparnih prirodnih brojeva od 1 do m}
VAR { deklarisanje promjenljivih }
i, m, s : INTEGER; { cjelobrojne promjenljive }
BEGIN
WRITELN('suma od 1 do m');
Write('m = ');
Readln(m);
s := 0;
FOR i:=1 TO m DO { ponavljaj za i=1 do m - pocetak petlje }
s := s + i; { kumulativna suma }
WRITELN ('suma= ', s); { ispis u petlji }
READLN;
END.
Ispis na ekranu:
Index
|