Исправьте ошибки в записи оператора ветвления

If 5

Const   nn = 20; var   i, j, n: integer;   a: array[1..nn, 1..nn] of integer; begin   writeln('задайте размер матрицы n');   readln(n);   if n > nn then       writeln('вы превысили допустимый размер матрицы 20')   else begin       writeln('матрица-результат');       for i : = 1 to n do       begin           writeln;           for j : = 1 to n do begin               if i < j then a[i, j] : = 1               else if i = j then a[i, j] : = 2               else a[i, j] : = 3;               write(a[i, j]: 2)           end;       end;       writeln   end end. тестовый пример: задайте размер матрицы n 10 матрица-результат   2 1 1 1 1 1 1 1 1 1   3 2 1 1 1 1 1 1 1 1   3 3 2 1 1 1 1 1 1 1   3 3 3 2 1 1 1 1 1 1   3 3 3 3 2 1 1 1 1 1   3 3 3 3 3 2 1 1 1 1   3 3 3 3 3 3 2 1 1 1   3 3 3 3 3 3 3 2 1 1   3 3 3 3 3 3 3 3 2 1   3 3 3 3 3 3 3 3 3 2