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