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