8.1.. Proizvod prvih 9 prirodnih brojeva.
Opis rješenja:
Opis programa:
Listing programa:
PROGRAM p08111069;
{proizvod prvih 9 prirodnih brojeva }
VAR { deklarisanje promjenljivih }
i : INTEGER; { cjelobrojne promjenljive }
p : REAL; { realne promjenljive }
BEGIN
WRITELN('proizvod od 1 do 9');
p := 1;
FOR i:= 1 TO 9 DO { ponavljaj za i=1 do 9 - pocetak petlje }
p := p * i; { kumulativni proizvod }
WRITELN ('proizvod = ', p); { ispis u petlji }
READLN;
END.
Ispis na ekranu:
Index
|