8.1.. Napisati program za ispis prvih n prirodnih brojeva unazad FOR petljom.

Opis programa: Ispis se izvodi naredbom FOR i := n DOWNTO 1 DO što znači promjena vrijednosti varijable i od n od 1.

Listing programa:

1
2
3
4
5
6
7
8
9
10
11
12
PROGRAM p08111003;
{prvih N prirodnih brojeva unazad}
USES
  WinCrt;
VAR
  i, n : INTEGER;
BEGIN
  WRITE('Do broja  ');
  READLN( n );
  FOR i := n DOWNTO 1 DO
    WRITELN('i = ', i );
END.

Ispis na ekranu:

Index