8.1.. Ispisati parne prirodne brojeve od 1 do 9.
Listing programa:
PROGRAM p08111056;
{ispis prvih 9 parnih prirodnih brojeva}
VAR { deklarisanje promjenljivih }
i : INTEGER; { cjelobrojne promjenljive }
BEGIN
WRITELN('parni od 1 do 9');
FOR i:=1 TO 9 DO { ponavljaj za i=1 do 9 - pocetak petlje }
IF i MOD 2 = 0 THEN
WRITELN ('i=',i); { ispis u petlji }
READLN;
END.
Ispis na ekranu:
Index
|