8.5.. Napisati program da ispisuje u prvom redu crtice umjesto imena i na kraju ispisuju ime a zatim u svakom narednom po jedno ime više.
.

Opis programa: Na slici je prikazan odnos redova i kolona.

Slika 1. Sporedna dijagonala i+j = n+1

Listing programa:

PROGRAM p08514045;
USES
  WinCrt;
CONST
  n = 3;         { broj redova }
VAR              { deklarisanje promjenljivih }
  i, j : Integer;

BEGIN
  WRITELN('Ispis IME');  { naslov }

  FOR i:=1 TO n DO
    BEGIN
      FOR j:=1 TO n DO
          IF i + j >  n + 1 THEN      { ispod sporedne dijagonale? }
            WRITE('IME ')    { tekst }
          ELSE
           WRITE('--- ');
      WRITELN;
    END;
  READLN;
END.

Ispis na ekranu:

Index